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v předsjezdovém období 




Ing. Jan Klabal 


V průběhu letošního roku vyvrcholí 
pětileté úsilí orgánů a organizací za 
splnění závěrů VII. a příprava na Vlil. 
celostátní sjezd Svazarmu. Celá kam- 
paň výročních besed, konferencí 
a sjezdů bude prostředkem kritického 
hodnocení výsledků práce Svazarmu, 
jeho podílu na plnění závěrů XVII. 
sjezdu KSČ rozpracovaných 6. spo- 
lečným zasedáním ÚV a RÚV Svazar- 
mu a příležitostí k vytýčení dalších 
záměrů v rozvoji branně výchovné 
činnosti. 

Plnění nových úkolů bude ovlivněno 
významnými celospolečenskými proce- 
sy vyplývajícími z realizace strategie 
urychlení sociálně ekonomického roz- 
voje společnosti na základě přestavby 
hospodářského mechanismu, dalšího 
rozvoje socialistické demokracie a for- 
mování nového myšlení, odpovídajícího 
intenzivnímu typu rozvoje společnosti 
i Svazarmu. 



Vlil. SJEZD 
SVAZARMUl 
1988 


Hlavní úsilí zaměřuje celá organizace 
v současném období na realizací 
a objektivní hodnocení účinnosti plnění 
úkolů politickovýchovné práce vyplýva- 
jících z rezoluce VII. sjezdu a zejména 
ze 4. a 6. zasedání ÚV Svazarmu jako 
součásti přípravy a průběhu výročních 
jednání a předsjezdové kampaně. 
Zvláštní pozornost musí být zároveň 
věnována stavu a určujícím tendencím 
branného vědomí, názorům a postojům 
členů i ostatních účastníků branných 
činností k vojenské a branné politice ve 
smyslu závěrů XVII. sjezdu KSČ 
a požadavku urychlení branně výchov- 
ného působení. 

V plnění usnesení 8. společného 
zasedáni ústředních výborů Svazarmu 
a důslednou realizací Plánu spolupráce 
ČSLA a Svazarmu se cílevědomě zvy- 
šuje výslednost přípravy branců, vybra- 
ných záloh, branců náhradní služby 
a příprava k civilní obraně. 

Vp smyslu závěrů celostátního aktivu 
klubů důstojníků a praporčfkú v záloze 
je současné obdob! poznamenáno 
vyšším stupněm organ izovanosti DPZ, 
rozvojem činnosti a zapojením v bran- 
né výchově mládeže, přípravě branců 
a činnosti v civilní obraně. Aktivněji je 
rozvíjena zájmová činnost KDPZ. 

Při rozvíjení zájmové branné činnosti 
v duchu 7. zasedání ÚV Svazarmu 
k završeni plnění rezoluce VII. sjezdu 
k masovějšímu a účinnějšímu branně 
výchovnému působeni organizace je 
řídicími orgány Svazarmu doporučeno 


důsledně vycházet z obsahu schvále- 
ných koncepci odborností. Za součást 
obsahu každé odbornosti musí být 
považována dlouhodobá příprava 
mládeže pro službu v ČSLA a to jak 
politická, tak psychofyzická a technic- 
ká. Musí být dále rozvíjena základní 
branná příprava, výchova na tradicích. 
V celém obsahu zájmové branné čin- 
nosti ve všech odbornostech při zvyšo- 
vání účinnosti branně sportovní a bran- 
ně technické činnosti, výcvikové, 
tréninkové, informační a propagační 
činnosti je třeba využívat moderní tech- 
niky, zejména elektroniky. 

K tomu musí iniciativně krajské, 
okresní a obvodní výbory organizovat 
součinnost s dalšími společenskými 
organizacemi, využívat činnost komisí 
pro brannou výchovu a komisí pro 
mládež a tělovýchovu. Musí také rozví- 
jet metodickou funkci vybraných ZO 
Svazarmu a jejich klubů vůči školám 
a dalším společenským organizacím, 
organizovat a podporovat soutěže za- 
měřené na rozvoj zájmově branné 
činnosti mezi neorganizovanou mláde- 
ži. 

V organizaci samé je pak třeba, jak 
zdůraznilo 7. zasedání, daleko rozhod- 
něji překonávat různorodou spolkovou 
omezenost a vytváření bariér. Místo 
uzavřeného klubismu, který se ještě 
u některých odborností v nemalé míře 
projevuje, by měla urychleně nastoupit 
dělná spolupráce s jinými odbornost- 
mi. Přinejmenším s těmi, které mají 
obdobný charakter zájmové činnosti, 
případně u kterých se mohou vzájemně 
využívat materiálové prostředky. 

Zájmovou brannou činností prolíná 
polytechnická výchova, ve které je 
nanejvýš žádoucí v ještě větší míře 
využívat progresivní techniky a odbor- 
ně zajištěné technické propagandy. Ve 
všech činnostech by dále měla být ještě 
důsledněji spojována odborná činnost 
s výchovou k tvůrčí práci. Bez progre- 
sivní techniky a tvůrčích přístupů nelze 
do budoucna rozvíjet na vyhovující 
úrovni většinu odborných činností. Pro- 
to se také musí výrazněji u všech 
odborností projevit rostoucí význam 
uplatňování vědeckých, zejména tech- 
nických poznatků i zkušeností. V jejich 
šíření, v technicky odborné propagan- 
dě, v politickovýchovné práci . 
a v zájmové činnosti vůbec, mnoho 
užitečného průběžně zabezpečuji sva- 
zarmovské odborné časopisy. 

Postupné prosazování technického 
rozvoje v oblasti modernizace provoz- 
ně materiálně technického zabezpeče- 
ní a zejména jeho vlivu na plánování, 
stejně jako úsilí o prosazení zkvalitnění 
péče o materiál, jeho údržbu a provo- 
zuschopnost i odpovídajíc! uložení ma- 
teriálu, jeho ochranu, předcházení ško- 
dám či neoprávněnému využíváni 
a obohacování, je dnes jednfm z prvořa- 
dých úkolů v celé organizaci. 

Rovněž v procesu plánování, rozpo- 
čtování, vyžadování a využívání fi- 
nančních, materiálních a investičních 
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prostředků je právě v před sjezdovém 
období třeba prosazovat opatření 
k vysoké hospodárnosti a realizaci 
schváleného rozpočtu. 

V řídicí a organizátorské práci, ve 
výstavbě organizace Je třeba důsledně 
prosazovat a realizovat závěry 6. spo- 
lečného zasedání, hlouběji analyzovat 
situaci a vytvořit předpoklady pro pl- 
něni usnesení a úkolů. Funkcionáři 
a pracovníci na všech stupních musí 
důsledněji uplatňovat živý styk s nižšími 
orgány. 

Novým prvkem v rozvoji organzačnf 
výstavby je požadavek jejího intenziv- 
ního rozvoje, čili nepovažovat počet 
a nárůst základních organizaci za roz- 
hodující kritérium a zamezit administra- 
tivnímu přístupu k organizační výstavbě 
a formálnímu náboru členů. Pokud se 
mají zakládat nové organizace tak jen 
tam, kde jsou pro to skutečně kádrové 
podmínky a tam, kde je potřeba rozši- 
řovat branně výchovné působeni. 

V samotné členské základně jsou 
pak současné požadavky ve Svazarmu, 
vyslovené i na 9. zasedání, směrovány 
na dosahování vyšší kvality práce. 
V základních organizacích by již ne- 
měly být prvořadým kritériem jen počty 
členů, ale především přístupy k vlastni 
činnosti a jejímu zkvalitnění se zaměře- 
ním na celospolečenský význam 
a prospěch i výchovné působení a to 
nejen na jednotlivé členy, ale i,, do 
širšího okolí. Určitou výjimkou jsou zde 
elektronické odbornosti, převážné 
z oblasti mikroelektronických aplikaci 
(výpočetní techniky, mikroprocesorů, 
automatizovaných a roboti zovaných 
obvodů a systémů), kde je žádoucí tyto 
dále rozvíjet na vyšší úrovni a podle 
daných možností je i materiálně tech- 
nicky co nejúčelněji zabezpečit 
(případně i z dovozu), a docílit tak ještě 
vyššího zájmu o tuto branně technickou 
činnost zejména mezi mládeží. Je to 
nanejvýš nutné nejen z hlediska zabez- 
pečeni dalších odborných kádrů pro 
národní hospodářství, ale hiavné pro 
potřeby brannosti, kde je třeba uvažo- 
vat o obsluze nejmodemější vojenské 
techniky vybavené elektronikou, auto- 
matizovanými a mikroprocesorovými 
soustavami. To také vyplývá za základ- 
ních úkolů Svazarmu, i nadále v nad- 
cházejícím období provádět důslednou 
přípravu branně výchovného aktívu pro 
zabezpečení úkolů ve prospěch čs. 
ozbrojených til a zabezpečit další roz- 
voj zájmové branné činnosti, zejména 
na školách. 

Branné a branné technické sporty 
rozviji Svaz pro spolupráci s armádou 
jako prostředek masového branné vý- 
chovného působení. Sleduje jejich dů- 
sledné zaměřování k potřebám socia- 
listického způsobu života, k formování 
morálně politických, odborně technic- 
kých a fyzických vlastností a schopností 
uvědomělého budovatele a obránce 
socialistické vlasti. 

Svaz pro spolupráci s armádou jako 
společenská dobrovolná organizace 
má při budování a obraně socialistické 
společnosti nezastupitelné postavení. 
Plněním úkolů Jednotného systému 
branné výchovy obyvatelstva a svými 
zájmovými branně technickými a bran- 
ně sportovními činnostmi přispívá 
k rozvoji branně společenského života 
občanů našeho socialistického státu. 
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TENDENCE VE VÝVOJI 




Ing. Branislav LACKO, CSc. 
Výpočetní středisko TOS Kuřím 


Jak vyplývá ze statistik i z prognostických analýz je oblast osobních 
mikropočítačů velmi dynamicky se rozvíjejícím odvětvím jak v zahraničí tak 
i u nás. 

Tento rozvoj zasáhne ve svých důsledcích vš ec hny oblasti spotečem&ého 
i hospodářského života. Rozšifení osobních mikropočítačů je přímým důsled- 
kem probíhajícího procesu elektronizace v našem národním hospodářství. 
Kromě jiného vyžaduje, aby se i v průběhu vzdělávacího procesu na Školách 
kaž# žák seznámil s principy práce počítače a se základy algoritmizace, 
programování a obsluhy, často se mluví o „druhé gramotnosti" , což jsou 
nezbytné vědomosti budoucího (už i současného) člověka — být schopen 
používat počítače jako nástroj ve své každodenní praxi. 

Pozna m e n ej m e, že tento prudký vývoj má dopad i do dalších oblasti. Hapř. 
jedno a meri c k é vydavatelství vydalo jen v roce 1983 300 knih o osobních 

1 a v roce 1934 dalších 400 titulů. V NSR vycházelo v roce 19Ů5 na 45 

i se hlavně progr a mo v ým vyba vením a aplikací mikropo- 


čítačů. 


K lepší orientaci výchovy žáků 
a studentů na školách přispěje jistě 
i zamyšlení nad dalším vývojem osob- 
ních mikropočítačů, protože naše bu- 
doucí generace by měla být připravena 
na takové prostředky výpočetní techni- 
ky, které bude používat v pozdější 
praxi, nikoliv na ty, které se v té době již 
nebudou vyrábět 

Základní pojmy a rozdělení mikropo- 
čítačů 

Rychlý rozvoj mikropočítačů přivádí 
s sebou i řadu negativních faktorů. 
Jedním z nich jsou terminologické 
potíže v důsledku zaostáváni tvorby 
pojmů za rychlým technickým vývojem. 

Proto jsou zde uvedeny základní 
pojmy a přehledné rozdělení mikropo- 
čítačů s cílem vytvořit jednotnou po- 
jmovou základnu alespoň pro účely 
tohoto článku. 

Mikropočítačem rozumíme číslicový 
samočinný počítač realizovaný na bázi 
mikroprocesoru, u jehož návrhu 
a realizace byia uplatněna jako rozho- 
dující hlediska minimální ceny a mini- ' 
mální velikosti, při zachování dosta- 
tečných funkčních vlastností pro potře- 
by uživatelů. 

U střediskových počítačů všech veli- 
kostí (malých, středních, velkých) 
a u superpočítačů jsou naopak rozho- 
dujícími hledisky velikosti výkonu, ka- 
pacita paměti a počet výkonných peri- 
ferií. Mikropočítač tvoří funkčně samo- 
statný celek na rozdíl od z abu do vanýc h 
mikroprocesorů, které jsou nedílnou 
součástí strojů a motorů. Mikropočítač 
je uživatelsky aplikovatelný, což zna- 
mená, že obsahuje všechna zařízeni 
potřebná pro aplikaci a nutné progra- 
mové vybavení. 

Mik roprocesor je integrovaný obvod 
veiké nebo velmi velké integrace, který 
realizuje podstatnou část funkci zá- 
kladní jednotky počítače. 

P rogr am ov ý kalkulátor jo zařízeni za- 
ložené na mikroprocesoru a orientova- 
né na zpracování numerických výpočtů 
zadáváním převážné lineárních algorit- * 
mú. Programování je prováděno zapa- 


matováni posloupnosti zmáčknutím 
tlačítek popř. znakovým symbolickým 
zápisem zadávaných výrazů. Od mikro- 
počítače se liší tím, že nepoužívá 
vyššího programovacího jazyka a jeho 
programy nejsou samomodifikujicí. 

Mikropočítače lze dělit na skupiny 
podle různých hledisek. 

Podle typu uživatele 

— Profesionální mikropočítače , které 
jsou používány školenými pracov- 
níky při výkonu svého povolání. 

— Mikropočítače pro volný čas, které 
jsou používány pro zábavu a re- 
kreační programování. 

Podle účelu použití dělíme profesionál- 
ní mikropočítače na: 

— mikropočítače pro vědecko-technlc- 
kó výpočty, orientované na řešení 
numerických problémů, které jsou 
často doplňovány prostředky pro 
grafický vstup a výstup; 

— kancelářské mikropočítače pro au- 
tomatizované zpracování dat v admi- 
nistrativě, jež zahrnuje: 

— vstup a uložení dat; 

— decentralizované zpracování dat; 

— zpracování textů 

(na tyto operace mohou být některé 
kancelářské mikropočítače specializo- 
vány); 

--řídicí mikropočítače pro automatizo- 
vané řízení rozličných technologic- 
kých procesů; 

—mikropočítačové vývojové systémy, 
určené pro vývoj programového vy- 
bavení mikropočítačů a mikroproce- 
sorů; 

— školní mikropočítače využívané 
u předmětů z výpočetní techniky; 
—speciální mikropočítače (na př. mik- 
ropočítače pro kosmický výzkum, 
vyučovací stroje). 

Mikrop o č ítače pro volný čas lze podle 
účelu použití rozdělit na dvě veiké 
skupiny: 

— specializované mikropočítače na 
televizní hry; 




— domácí počítače pro víceúčelové 
použití. 

Podle způsobu p r ov ed e ni dělíme mik- 
ropočítače na: 

— stolní; 

přenosné (speciálné upravené pro 
převáženO; 

— kapesní. 

Na základě způsobu výroby rozlišuje- 
me: 

— sériově vyráběné mikropočítače; 

— mikropočítače sestavené na ob- 
jednávku z průmyslově vyráběné 
stavebnice mikropočítačového sy- 
stému; 

— amatérsky navržené a sestavené 
mikropočítače; 

— mikropočítače sestavené amatér- 
sky z průmyslově vyráběné sta- 
vebnice mikropočítače. 

Podle šiřky toku dat na sběrnici roz- 
dělujeme mikropočítače s šířkou toku 
dat. 


— 8 bitů; 

— 16 bitů; 

— 32 bitů. 

Podle architektury dělíme mikropo- 
čítače na: 


— mikropočítače se společnou sběr- 
nicí; 


Základní charakteristiky mikriopočítačů 


Rok 

1979 

1985 

1990 (výhled) 

architektura 

(mikroprocesory) 

1x8 bit 

1x16b 
+ speciální 

2— 10x16/32b 

režim práce 
objem operační 
paměti RAM 

monoprogramový 

32 až 64 kB 

koprocesory 
multiprograínování 
126 až 640 kB 

multiprocessing 

512 kB až 4 MB 

ROM 

2až4kB 

32 kB 

128 kB 

Operační systém 

CP/M 

MS-DOS 

UNIX 

Programovací 

jazyky 

60% BASIC 

40% Pascal 

35% Ada 


20% Assembler 

25% Basic 

35% C 


20% ostatní 

20% ostatní 

10% Pascal 

grafika 


5% assembler 

10% ostatní 

— 

640x200 

1024x1024 

znaky 

(256x92) 

barevně 

barevně 

20řx32zn 

25ř x 80 zn 

25ř x 132 zn 



barevně 

barevně 

tisk 

mozaiková 

mozaiková 

barevná 


tiskárna 

tiskárna s 

laserová 



grafickými 

možnostmi 

tiskárna 

vnéjjí paměť 

2x8" disketa 

5,25" disketa 

3.5" disketa 


á 256 kB 

360 kB 

2,5 MB 



5,25" pevný 

5,25" pevný 



disk 20 MB 

disk 140 MB 

+ 

LASER RAM 




s kapacitou 

0,5 GB 

telekomunikační 

možnosti 

I 

lokální sítě 

LAN 

heterogenní sítě 




s dálkovým 
přenosem dat 

operační rychlost 

25 000 op/sec 

0,5 MIPS 

10 MIPS 


— s vlastní architekturou; 

(data fow, maticové procesory 
apod.). 

Osobní mikropočítače vyčleňujeme 
z profesionálních mikropočítačů 
a z mikropočítačů využívaných ve vol- 
ném čase jako mikropočítače k indivi- 
duální potřebě. 

Názvem se chce zdůraznit: 

— že tento mikropočítač obsluhuje 
a využívá jedna a tatáž osoba 
a není potřeba, aby provozování 
zajišťoval tým specialistů; 

— že uživatel má zdroje celého mik- 
ropočítačového systému při 
výpočtu zcela k dispozici a nesdílí 
je s jinými uživateli. 

Poznámky 

1 . U mikropočítače je rozhodující nízká 
cena a malé rozměry. Výkonnost je zde 
relativní pojem podmíněný historicky. 
Tak, jak se s rozvojem výpočetní 
techniky zvyšují její technické parame- 
try, může být určitý výpočetní výkon 
považován za velký, popř. malý 
v rozdílném časovém období. 

2. Rozvoj výpočetní techniky rozšiřuje 
rozdělení i počty kategorií u jednotli- 
vých hledisek. Proto i navržené roz- 
dělení je nutno chápat jako pracovní. 

3. Jednou z obecných vlastností mikro- 
počítačů je univerzálnost. Proto jednot- 
livé kategorie mikropočítačů je nutno 
chápat jako neostré. (Na mikropočítači 
pro VTV lze rovněž zpracovávat texty 
a kancelářský mikropočítač pro decen- 
tralizované zpracování dat může vý- 
sledky prezentovat graficky). 

Vývoj mikroprocesorů a paměti 

Mikroprocesor je základním staveb- 
ním kamenem každého mikropočítače 
a vtiskuje příslušnému mikropočítači 


charakteristické vlastnosti a určuje je- 
ho vnitřní architekturu. 

Dynamický rozvoj výroby mikropro- 
cesorů dokumentuje následující sku- 
tečnost: první mikroprocesor Intel 4004 
se objevil v roce 1971, ale již v roce 
1981 použil americký průmysl 500 000 
mikroprocesorů a v celém světě bylo 
1 milión přístrojů se zabudovaným 
mikroprocesorem. 

Ruku v ruce s vývojem mikroproce- 
sorů postupuje i výroba polovodičo- 
vých pamětí. Firma IBM (USA) začala 
od letošního roku montovat do svých 
výrobků tolik očekávané megačipy 

— paměti s kapacitou 1 milión bitů na 
jedné křemíkové destičce 5x5 mm 
Výrobu pamětí o kapacitě 4 Mb plánuje 
firma Siemens v novém závodě 
v Pullachu již v roce 1989. 

Zatím ovládají oblast polovodičových 
pamětí japonští výrobci s produkcí 
laciných integrovaných pamětí 256 kb. 

V roce 1988 se očekává osobní 
mikropočítač označovaný „3M“ (1 MB 

— 1 MIPS — 1 Mpixels) a supermikro- 
počítač označovaný „10-10-10“ (10 MB 

— 10 MIPS — 10 000JŘ). 

Hlavni směry rozvoje osobních mikro- 
počítačů 

Přechod na mikroprocesory 32b 
a 64b. 

Zvětšení kapacity operační paměti nad 
1 MB. 

Využití přehrávačů CD, DCI, DAT, VI- 
DEO DIS©, pamětí OROM, ORAM. 
Zvětšené komunikační možnosti. 

Vstup a výstup mluveným slovem. 

Práce na více úlohách současně. 

Nástup programovacího jazyka Ada. 


Rozšíření operačního systému UNIX. 
Zapojení osobních počítačů do integro- 
vaného zpracování dat a automatizo- 
vané kanceláře. 

Využívámí výsledků výzkumů umělé 
inteligence (expertní systémy, sys- 
témy pro podporu rozhodování 
— DDS, CAD + CAM + CAP + CAT 
= CIM, CAI apod.) 

Programovací jazyky 

Jazyk symbolických adres pro všechny 
typy mikroprocesorů. 

Dosavadní známé jazyky podle ANSI: 

a) generování kódu; 

COBOL 74, FORTRAN 77, Pascal 
PL/M, Ada; 

b) interpretačním systémem; 

BASIC (někdy také jako kompilátor). 


Nové jazyky 

C — systémový jazyk vyvinutý v Labo- 
ratořích firmy BELL rozšířený díky 
skutečnosti že operační systém UNIX 
je napsán v tomto jazyku. Jedná se 
o dost univerzální programovací ja- 
zyk. 

FORTH — vznikl v roce 1970 pro 
potřeby řízení teleskopu v USA. Po 
jeho úspěšném nasazení vznikla 
samostatná firma FORTH, která jazyk 
zdokonalila a nabídla k implementaci 
na nejrozšířenější mikroprocesory 8b 
(Z80, i 8080, i 8085) i 16b (i 8086, 
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Na našem trtiu se v postedni době objevilo několik typů mikropočítačů o které 
je stále velký zájem. Jsou také cenově p f istu pné širší veřejnosti. Svědčí o tom 
zejména rychlost, s jakou mizl z pultů pr odeje n Domácích potřeb i Tuzexu. 
Nejrozěff e n ě iěfm typem m i kropo čí tač e u nás je v současn é době ZX Spectrum 
firmy Sinclair a následující odvozené typy (ZX Spectrum Plus, Delta, atd.). Na 
tyto typy mikr op o čí tačů je u nás k dispozici velké množství rozsáhlého 
programového vybaveni, překladači vyšších programovacích jazyků počínaje 
a různými typy her konče. 


M68000, Z800). Jedná se interpre- 
tační jazyk orientovaný na práci se 
zásobníkem. Je použito notace RPN 
pro zápis výrazů. 

LOGO — původně určený pro výuku 
programování žáků základních škol 
v USA, byl přepracován na MIT pro 
jazyk orientovaný na snadné vytváře- 
ní grafických obrázků af už z kláves- 
nice nebo pomocí ukazovacího za- 
řízení. 

Smafltdk — původně vyvinut pro mik- 
ropočítače Xerox. Využívá principů 
modulárního programování a soubo- 
ru typizovaných podprogramů. Jsou 
v něm uplatněny principy neproce- 
durálního programování (co se má 
provádět, ne jak se to má provádět). 

PROLOG — jazyk vybraný japonským 
projektem 5. generace počítačů jako 
základní jazyk pro řešení úloh umělé 
inteligence. Je založen na t.z.v. Hor- 
novských klauzulích (podtřída logiky 
prvního řádu a Robinsonově rezo- 
lučním principu. 

USP — jazyk na zpracování seznamů 
s využitím LAMBDA kalkul; jazyk 
původně určený na zpracování nenu- 
merických úloh se s výhodou používá 
pro řešení úloh umělé inteligence. 

Operační systémy 

Z různých operačních systémů se pro- 
sadily ve větši míře následující: 

CP/M Digital Research) 

Prakticky mezinárodní standard 8b 
. mikropočítačů na mikroprocesorech 
i 8080, i 8085, Z80 (odhaduje se asi 800 
tis. instalací) velmi univerzální a porta- 
bilní. Srovnatelný ekvivalent v ČSSR 
M1KROS, v NDR SCP. Obsluha jednoho 
uživatele bez multiprogramování. Pod- 
mínky pro aplikaci: alespoň 56 kB 
RAM, dvě diskety po 126 kB, klávesni- 
ce ASCII, obrazovkový alfanumerický 
displej s kurzorem a mikrotiskárna. 

ISIS (Intel) 

Operační systém rozšířený díky mikro- 
počítačovým vývojovým systémům fir- 
my Intel pro mikroprocesory Í8080 
a 18085. Práce s jedním programem. 
Lze ho použít i pro i8088. 

REX 80 (Systems and Software) 

Operační systém pro 8b mikroproceso- 
ry Í8080 a Z80 pracující v aplikacích 
reálného času. Dodává se včetně zdro- 
jového textu. 

PC -DOS (IBM, původně MS-DOS firmy 
Microsoft) 

Téměř mezinárodní standard v oblasti 
16b personálních počítačů s mikropro- 
cesorem 18086 v důsledku jeho použití 
u IBM PC. 

CP/M-86 (Digital Research) 

Již ne tak úspěšná replika CP/M od 
téže firmy pro multiprogramovací 
prostředí až 16-ti úloh pro 16b mikro- 
procesory Í8086 (pro mikroprocesory 
M 68000 je ve verzi CP/M-86k). Existu- 
je i ve verzi CONCURRENT CP/M-86 
pro aplikací v reálném čase. 

UNIX-Microsoft (prodej) — Bell Tele- 
phone Lab. (vývoj) Multiprogramovací 
operační systém 16b mikropočítačů 
a mikropočítačů PDP11, DEC-VAX 
a dalších. Umožňuje i použití 32b mik- 
roprocesorů. 

Novějši verze je označovaná Xenix. 


To byl jeden z hlavních důvodů, proč 
jsem při stavbě amatérského mikro- 
počítače zvolil koncepci programově 
kompatibilní s tímto profesionálně vy- 
ráběným mikropočítačem, přestože 
jsem si vědom, že jeho obvodová struk- 
tura není nejvýhodnéjší. Neumožňuje 
totiž' bezproblémové rozšiřování sy- 
stému, a to zejména díky použitému 
způsobu lineárního adresování perife- 
rií. Při návrhu jsem se snažil tyto nevý- 
hody potlačiL Přineslo to s sebou něk- 
teré programové nekompatibility (byla 
zjištěna jedna hra, která se dá ovládat 
pouze ovládačem, a jedna, u které 
nefungují časové smyčky tak jak na 
originálním mikropočítači vzhledem 
k jejich umístěni z částí ve videoRAM 
a z části v horní polovině paměti). 
Z mého hlediska je to nepodstatné, ale 
přesto bude uveden způsob, jak udělat 
adresování plně kompatibilní s originál- 
ním obvodovým zapojením. Je však 
třeba zdůraznit, že vzhledem k jiné 
filozofii zobrazování videoRAM nebu- 
dou odstraněny časové disproporce 
programů, uložených ve videoRAM. 
Tyto programy zde probíhají o více než 
třetinu rychleji. U žádného autorovi 
dostupného systémového programu 
nebyla zjištěna nefunkčnost. Při stavbě 
jsem se snažit důsledně vycházet ze 
součástkové základny, dostupné po- 
čátkem roku 1987 v maloobchodní síti. 
Přesto bylo nutno použít dvou typů 
obvodů, které v té době nebyly 
k dostání, a to mikroprocesoru Z80A, 
popřípadě jeho ekvivalentu z NDR 
s označením UA880D, a dynamických 
pamětí RAM 64kb s dobou přístupu 
pod 150 ns. 

2. Filosofie návrhu 

V dalším textu jsou signály aktivní 
v log. 0 označovány buď čarou nad 
názvem nebo písmenem N na konci 
názvu. Signál LOAD N je tedy ekviva- 
lentní signálu LOAD. Protože užívané 
značení žádného signálu nekončí pís- 
menem N, je tato konvence jedno- 
značná. Jako videoRAM je označována 
druhá čtvrtina vnitřní paméti (adresy 
4000H až 7FFFH). 

Předtím, než budou popsány jednotlivé 
obvodové bloky navrhovaného obvo- 
dového řešení, bude popsán zákaznic- 
ký obvod ULA, používaný v originálním 
Spectru, a to nikoliv z hlediska zapojení 
vývodů, ale z hlediska funkční filozofie. 
Většina obvodů totiž zastupuje tento 
zákaznický 10. ULA zabezpečuje tyto 
funkce: 


a) Tvorba videosignálu: 

I) čítače adresy displeje, 

II) muttiplexery adresy displeje pro 
dynamickou paměť RAM (přepínání 
adresy jas/atribut), 

III) zajištění pozdržení činnosti proce- 
soru v okamžiku přístupu obvodu do 
videoRAM (pozastavení hodin), 

IV) obvody, generující řádkové a sním- 
kové synchronizační signály, 

V) obvody, tvořící videosignály Y (jas) 
a U, V (signály barvy v normě PAL). 

b) Připojeni základních periférii: 

I) připojeni klávesnice, 

II) připojeni magnetofonu, 

11!) připojení reproduktoru. 


c) Vytvořeni inicializačního signálu pro 

samotný obvod. 

d) Ge nero ván i h o di nové h o taktu pro 

procesor. 

e) Přerušování běhu mikroprocesoru 

s kmitočtem 50 Hz, maskovatelným 
přerušením pro zabezpečení periodic- 
ké programované obsluhy klávesnice 
a vnitřního počítadla času. 

f) Tvorba signálů RAS a CAS pro 
videoRAM. 


ad a-i) Při návrhu by měly být obvody 
čítačů adresy displeje sestaveny tak, 
aby generovaly bodový kmitočet 7 MHz 
(což je zároveň základní kmitočet osci- 
látoru mikropočítače) a adresu 32 
osmic bodů na řádek a 192 řádek na 
snímek. Základní kmitočet oscilátoru 
obvodu ULA je sice 14 MHz, ale tento 
kmitočet není v navrhované koncepci 
nutný. Zároveň musí být vytvářen signál 
udávající zda adresa je platná a bude 
se zobrazovat informace z videoRAM 
nebo zda se bude zobrazovat jasová 
informace, na kterou je nastaven regis- 
tr borderu. Signál borderu zabírá 6/14 
délky TV řádku a 8/20 TV půlsnímku. 
Z přepínacího signálu a z adresových 
signálů čítače je vhodné odvodit synch- 
ronizační impulsy pro TV videosignál. 


ad a-ll) dále je třeba přepínat adresu 
bajtu, v němž je uložena jasová infor- 
mace o příštích osmi zobrazovaných 
bodech (udávající, že při log. 1 je 
zobrazován jas, odpovídající jasu in- 
koustu a při log. 0 jas, odpovídající jasu 


papíru) s adresou bajtu, v němž je 
uložen odpovídající atribut (bajt, který 
má na bitech 0 až 2 informaci o barvě 
inkoustu, na bitech 3 až 5 informaci 
o barvě papíru, bit 6 obsahuje informa- 
ci o přijasení a bít 7 o blikání). Když si 
projdeme překlad ROM Spectra, zjistí- 
me, že jasové informace jsou uloženy 
na adresách 4000H až 57FFH, zatímco 
odpovídající atributy obsahuje paměť 
v rozsahu 5800H až 5AFFH. Odpovída- 
jící úrovně na příslušných adresách se 
nastavují podle následujícího rozpisu 
(ADHx — x-tý bit adresy displeje 
horizontálně, ADVy — y-tý bit adresy 
dispetje vertikálně): 


bit AB 

obsah při 
jasu 

obsah při 
atributu 

ABO 

ADHO 

ADHO 

AB1 

ADH1 

ADH1 

AB2 

ADH2 

ADH2 

AB3 

ADH3 

ADH3 

AB4 

ADH4 

ADH4 

AB5 

ADV3 

ADV3 

AB6 

ADV4 

ADV4 

AB7 

ADV5 

ADV5 

AB8 

ADVO 

ADV6 

AB9 

ADV1 

ADV7 

AB10 

ADV2 

log. 0 

AB11 

ADV3 

log. 1 

AB12 

ADV7 

log. 1 

AB13 

log. 0 (AVSO) 

log. Q (AVSO) 

AB14 

log. 1 (AVS1) 

log. 1 (AVS1) 

AB15 

log. 0 (AVS2) 

log. 0 (AVS2) 


Toto adresování je dosti „složité” 
z toho důvodu, že ULA kvůli minimali- 
zaci časových ztrát vyčítá obrazovou 
informaci ve stránkovém módu (dol- 
ních 8 bitů musí být shodných). Protože 
navrhované řešení nepozastavuje čin- 
nost procesoru (viz dále), není spolu- 
práce s RAM ve stránkovém módu 
nutná. Přináší to obvodové zjednodu- 
šení, neboť přepínání adres snadno 
zajistíme dvojitými multipiexery. Je vi- 
dět, že pokud bychom v době' adreso- 
vání paměti obvodem ULA přivedli na 
vodiče AB13 až AB15 nikoli konstantní 
logické úrovně, ale výstupy pomocného 
tříbitového registru AVSO až AVS2, 
mohli bychom získat osm oblasti pa- 
měti, jejíchž obsah by se dal zobrazo- 
vat. 


ad a-ltř/ Když prostudujeme časovači 
diagram procesoru Z80A, zjistíme, že 
nemůže nastat situace, kdy by požádal 
o přístup do paměti častěji, než jednou 
za dvě periody hodinového signálu. Při 
kmitočtu hodinového signálu 3,5 MHz 
je perioda 286 ns. Procesor tudíž může 
pracovat s pamětí maximálně jednou 
za 572 ns. Je vidět, že pokud bude 
bodový kmitočet displeje vhodně syn- 
chronizován $ hodinovým signálem pro- 
cesoru a k dispozici budou dostatečně 
rychlé paměti RAM, je možno navrh- 
nout časový muitiplex přístupu do 
paměti tak, aby procesor nemusel být 
pozastavován. Synchronizace se nej- 
jednodušeji zajistí tak. Že od jednoho 
oscilátoru se bude odvozovat jak bodo- 
vý kmitočet, tak hodiny procesoru. 
Tudíž programy umístěné v oblasti 
videoRAM budou probíhat o něco 
rychleji, než na originálním mikropo- 
čítači, zatímco programy umístěné ve 
zbytku paměti a nekomunikující s ob- 
lasti videoRAM poběží stejně rychle. 
Časový muitiplex musí být však navr- 
žen tak, že nadřazenou (prioritní) 
složkou bude procesor, informace pro 
displej musí být vyčítána z pamětí 


okamžitě, jakmile o přistup do paměti 
procesor nežádá, a to právě dvakrát za 
čtyři hodinové cykly. Zobrazeni osmi 
bodů na obrazovce trvá totiž prává čtyři 
hodinové cykly a pro zobrazení osmi 
bodů je třeba vyčtení dvou bajtů 
z videoRAM (jas a atribut). Protože 
však nevíme, za kolik cyklů bude toto 
vyčítání skončeno (může být za dva 
nebo za čtyři), je nutno do cesty obou 
signálů zařadit po jednom osmibitovém 
vyrovnávacím registru pro synchroni- 
zaci plněni registrů displeje. 

ad a-IV/ Základ návrhu těchto obvodů 
byi popsán v části a-ll/, pouze je třeba 
zajistit sečtení řádkových a snímkových 
synchronizačních Impulsů pro získání 
úplné synchronizační směsi. 


ad a-V/ Tato část úzce navazuje na 
obvody časového multiplexu paměti. 
Informace o jasu a atributu je jednou za 
osm period bodového signálu přepsá- 
na do registrů displeje. První z nich 
musí být posuvný registr, který je plněn 
jasovou informací. Druhý je vyrovnáva- 
cí paralelní registr. Výstup posuvného 
registru musí ovládat přepínáni signálů 
jasové informace mezi inkoustem 
a papírem v závislosti na nastaveni 
přfznakovóho bitu blikání. Dále musí 
být ovládáno přepínáni jasu na jas 
borderu (např. pomocí signálu SCR). 
To se dá zabezpečit třemi třfvstupovými 
multipiexery, na jejichž výstupech do- 
staneme signály RGB. Společné se 
signálem synchronizační směsi SYNC 
a signálem při jasnění z nich dostaneme 
v součtovém analogovém obvodu kom- 
pletní videosígnál. Tento videosignál 
můžeme vést do vídeovstupu televizoru 
nebo monitoru. Pomoci dalších obvodů 
můžeme vytvořit signály U. V a posléze 
i kompletní videosignál v normě PAL 
(norma SECAM se pro výstup mikro- 
počítače příliš nehodí výhledem k ne- 
jednoznačnosti barevného zobrazení 
vodorovné čáry o šíři jednoho bodu). 
Je však třeba uvážit, není-li lepším 
řešením úprava vstupu barevného tele- 
vizoru pro signály R, G, B, I (intenzita) 
a SYNC. Obvodové to vyjde jednoduše- 
ji a kvalita zobrazení je lepší. Takto je 
možno použít i televizory bez dekodéru 
PAL. 


ad b/ Připojení tří základních perifárif je 
velice jednoduché. Všechny tři jsou 
totiž adresovány jedinou adresou 
(FEH-254D). Vstupem klávesnice je 
horních osm bitů adresové sběrnice, 
výstupem pět bitů, připojovaných 
vstupní instrukcí IN (C), A na dolních 
pět bitů datové sběrnice. Tato instrukce 
posílá na dolních osm bitů datové 
sběrnice obsah registru C, pomocí 
kterého je adresována periférie, ne 
horních osm bitů je posílán obsah 
registru B. Je využíván k postupnému 
aktivování linek klávesnice. V registru 
B je totiž log.O pouze na jednom bitu. 
Rotaci obsahu tohoto registru a perio- 
dickým čtením klávesnice se dá zjistit, 
které tlačítko je zmáčknuto. K oddéfenf 
horních osmi biti) adresové sběrnice od 
klávesového pole stačí použit osm 
diod, zapojených katodami na sběrnici. 

Magnetofon je připojen pomocí dvou 
bitů — vstupního a výstupního. Sign# 
při nahráváni je čten z bitu D6 datové 
sběrnice a při ukládáni na magnetofon 
je informace posílána na bit D3. Na bit 
D4 je posílána Informace, ovládající re- 
produktor a na bitech DO až D2 aktuální 
informace v barvě borderu. Potřebuje- 


me tedy pěti bitový registr pro zápis dol- 
ních pěti bitů datové sběrnice. Obou- 
směrné odděleni je vhodné (oddělo- 
vače sběrnice). 

ad e/ Pokud nepoužijeme pevnou 
paměť ROM 16 kB, je nutno po zapnuti 
napájení kromé inicializace procesoru 
ještě zajistit připnuti stínové ROM. V té 
musí být program, který nahraje do 
prvních 16 kB paměti RAM obsah origi- 
nální paměti ROM ZX Spectrum. Výho- 
dou tohoto řešení je to, že nemusíme 
používat pouze program z originální 
ROM, ale i program upravený (napří- 
klad opravené chyby originálního pro- 
gramu, obsah paměti ROM, který je 
pod názvem ISO ROM nabízen 
v Západní Evropě, popřípadě do vol- 
ného místa napsat své vlastní progra- 
my). Nesmíme však zapomenout na to, 
že do ROM se nesmí dšti zapsat 
informace (samotná originální ROM 
zapisuje sama do sebe, mnoho firem- 
ních programů zapisuje „přes” ROM 
kvůli znesnadnění kopírování takto 
uméle prodlouženého bloku). Po 
ukončení nahrávání se musí stínová 
ROM automaticky odepnout a program 
znovu spustit od adresy OOOOH. 


ad d/ Hodinový kmitočet lze nejjedno- 
dušeji získat vydétením bodového 
kmitočtu displeje dvěma; získáme tak 
přesně 3,5 MHz. 


ad e/ Pro generování přerušení lze 
s výhodou použit snímkové synchroni- 
zační Impulsy. Při plánovaném dalším 
použití vstupu INTN je nutno tento 
signál přivádět přes výstup s otevře- 
ným kolektorem, jinak jej fze připojit 
přímo. Přerušení bude sice genero- 
váno v jiné fázi vůči zobrazování obra- 
zovky než v originálním Spectru (tam je 
generováno v době prvního aktivního 
řádku), to ale nemá praktický význam. 


ad f t Vzhledem k tomu, že je použita 
fyzicky pouze jedna paměť, je signál 
RAS generován pro celou paměť na- 
jednou. Je třeba odlišit signál RAS při 
vstupu procesoru do paměti (značeno 
RASP) a signál RAS, pokud jsou vy- 
čítána data pro displej (značeno 
RASD). Signál CAS je totiž nutno 
generovat při každém přístupu displeje 
do paměti, zatímco při obnovovacím 
cyklu procesoru se generovat nemusí. 
Ovládáním signálu CAS (ze také jedno- 
duše připojit expanzní paměť RAM. 


Obvodové řešeni 


Obvodové řešení mikropočítače může- 
me rozdělit do několika bloků, jejichž 
činnost i vzájemná spolupráce bude 
dále popsána: 

a) procesor, inicializační obvody 
a zesilovače adresované sběrnice 
— obr. 1, 

b) čítač adresy displeje a multipiexery 
adresy dynamické paměti RAM — 

obr. 2, 

c) dynamická paměť RAM, stínová 
paměť PROM, vyrovnávací registry dy- 
namické paměti RAM a multipiexery 
signálů pro video — obr. 3, 
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d) obvody řízeni přístupu do dynamic- 
ké paměti RAM — obr. 4, 

e) obvody připojení základních periferií 

- obr. 5, tfc 

f) obvody připojení TV a MGF — obr. 6, ^ ~ 


ad a) Procesor je připojen svou adre- 
sovou sběrnicí (vývody AO až AI 5) na 
systémový konektor a zároveň i na 
vstupy zesilovačů adresové sběrnice. 
Jsou realizovány dvěma obvody 3212, 
lze však použít libovolné neinvertující 
zesilovače s nízkopříkonovými vstupy 
(např. 8282, 8286). Datová sběrnice 
procesoru je připojena opět na sy- 
stémový konektor a vede na další 
bloky. Řídicí sběrnice procesoru je 
opět celá vyvedena na systémový ko- 
nektor. Vstupní signály jsou ošetřeny 
připojením na +5V přes odpory 
15kíi. Výstupní signály jsou zesíleny 
invertory TTL (RFSHN, RDN, WRN, 
MREQN, IDREQN) a vedeny ke zpraco- 
vání do dalších bloků. Signál RESETN 
je generován po připojení napájecího 
napětí, po vynulování inicializačního 
klopného obvodu výstupní instrukcí 
a nebo po zmáčknutí přepínacího tlačít- 
ka ŘEŠET. Tento signál však musí 
přijít v okamžiku, kdy procesor neko- 
munikuje s pamětí. Po jeho příchodu se 
totiž okamžité začnou měnit údaje na 
datové i adresové sběrnici a do právě 
aktivované buňky se může zapsat myl- 
ná informace, častější je však případ, 
že se přepíše několik buněk, vzájemně 
se lišících pouze v několika adresových 
bitech. Tato situace může nastat prak- 
ticky pouze při ručním aktivování sig- 
nálu RESET. Z toho důvodu je signál 
v tomto případě vytvořen teprve po pří- 
chodu první nástupné hrany signálu 
Ml, čímž je zajištěna jeho správná ča- 
sová koincidence s aktivací paměti. 


ad b) Základní součástí tohoto bloku je 
oscilátor 7 MHz, který může být osazen 
krystalem. Na tento kmitočet může být 
i vydělen kmitočet jiného oscilátoru. 
Jak bylo ale ověřeno praktickým provo- 
zem, svou stabilitou plně postačí multi- 
vibrátor z invertorů TTL, doladěný na 
kmitočet 7 MHz kapacitním trimrem. 
Výstupní kmitočet oscilátoru je vydělen 
klopným obvodem D dvěma a použit 
jako hodinový kmitočet procesoru. 
Tento signál je také veden do čítače 
horizontální adresy znaku, tvořeného 
dvěma obvody 7493 a jedním hradlem 
AND. Tento čítač dělí v poměru 1 :224, 
přičemž na jeho nejvyšším výstupu je 
střída signálu 6:8. Jako adresové výstu- 
py se užívá šest významnějších bitů. 
Nejvyšší bit je označen BH (bor der 
horizontálně). Čítač adresy vertikálně je 
sestaven ze dvou čítačů 7493 a klop- 
ného obvodu typu D. Je inkrementován 
signálem RSI (řádkový synchronizační 
impuls) z důvodu časového zpoždění 
průchodu signálu čítači. Zpoždění sig- 
nálu na čítači adresy může být maxi- 
málně 140 ns (po dobu, v níž má signál 
hodin procesoru úroveň log. 0). Paměť 
je totiž aktivována vždy v době, kdy 
jsou hodiny procesoru v úrovni log 1. 
Pokud by totiž uvažované zpoždění by- 
lo větší než 140 ns, nemohlo by se 
použít uvažované hašení časového mul- 
típlexu. Při změně adresy během vy- 
čítání informace z paměti pro 


op 
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Obr. 1. Procesor, inicializační obvody a zesilovače adresové sběrnice 

(IO1-Z80ACPU, 102 — 7474, 103, 4 — 3212, 105 — 7404, 106, 7 — 7403) 









displej by tato informace nebyla jedno- 
značná. Vyšší bity čítačů adresy disple- 
je musí být proto inkrementovány 
v době, kdy tato jednoznačnost nevadí. 
Pokud je to prováděno při zobrazování 
borderu, nevadí případné „chyby", pro- 
tože se na obraze neprojeví. Čítač 
vertikální adresy dělí v poměru 1:320, 
na jeho nejvyšším výstupu (klopný 
obvod) je střída 8:12. Tento signál je 
označen BV (border vertikálně). 

Signály synchronizační směsi jsou 
vytvářeny dvěma monostabilními klop- 
nými obvody (dvě poloviny obvodu 
74123). Signály BH a BV jsou obvody 
trvale nulovány během aktivní doby 
zobrazování videoRAM. Prostřednic- 
tvím signálů ADH3 a ADH4, popř. ADV6 
a ADV7 jsou signály synchronizační 
směsi generovány přibližně v 1/3 aktiv- 
ní doby signálu BH a 1/2BV. časové 


ADH2 IJTJTJTJTJTJTJTJTJTJTJTJXn^ 



Obr. 2a. časový diagram signálů BH 
aRSI 


ADV5 

ADV6\ 



ADV7X 


Obr. 2b. časový diagram signálů BV 
aSSI 


rozloženi signálů BH a RSI je na 
obr. 2a, časový diagram signálů BV 
a SSI je na obr. 2b. 


Pro přepínání adres dynamické pa- 
měti RAM a pro vytvoření signálu CAS, 
zpožděného za signálem RAS, je použi- 
to celkem pět pouzder dvojic čtyř- 
násobných multiplexerů. čtyři z nich 
jsou použity pro přepínání nižší a vyšší 
poloviny adresy dynamické paměti 
RAM, jedna polovina pátého je použita 
pro generování signálu CAS. Na tuto 
pozici vyberte nejpomalejší z použitých 
multiplexerů. Adresový bit AB15 není 
na multiplexer veden přímo, ale přes 
hradlo EXOR, které je využito jako říze- 
ný invertor. Na jeho druhý vstup je při- 
pojen signál INIT a pokud je v log.O, 
výstup sleduje logickou úroveň dru- 
hého vstupu, tedy AB15. V opačném 
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Obr 3 Paměť RAM, PROM, vyrovnávající registry paměti a vytvoření signálu displeje 
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případě je na výstupu negace druhého 
vstupu, tedy AB15N. Kvůli odstranění 
vlivu rozdílného zpoždění jednotlivých 
pouzder multiplexerú je signál CAS 
zpožďován jedním invertorem (a záro- 
veň negován pro přímé připojení na dy- 
namické paměti) teprve po průchodu 
tímto multiplexerem. Signál CAS je ge- 
nerován vždy, pokud o přístup do pa- 


měti požádá displej (tzn. při RASO), 
anebo když není obnovovací cyklus pa- 
měti a zároveň není vybrána stínová 
paměť ROM. Musí tedy splňovat násle- 
dující rovnici: 


CAS=RASD + CSRAM 

(D 

CSRAM=SP1 -RFSHN 


(INITN+AB15) 

(2). 


jadřují (a ani nemohou) časový sled 
signálů RAS a CAS. Tento je zajištěn 
zpožděním signálů při průchodu logic- 
kými obvody a je přibližné znázorněn 
na obr. 2c. Signál SPI určuje, zda 



10 fis 



_ , . — — Tyto rovnice nám vyjadřují logickou Obr. 2c. časový sled signálů RASN 
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procesor komunikuje s vnitřní paměti 
nebo s vnější pamětí. Pokud je v úrovni 
log.O, komunikuje s vnější pamětí, 
v opačném případě je aktivována pa- 
měť vnitřní. Signál SPI je vyveden na 
konektor mikropočítače a přes odpor 
připojen na +5V. Výstupem s otevře- 
ným kolektorem je možno jej ovládat 
z připojené expanzní desky paměti, 
a tak přepínat paměť programově. 
VideoRAM je umístěna stále ve vnitřní 
paměti, nelze ji přemístit do paměti 
expanzní. Celou přídavnou paměť tak 
lze použít pro programové účely, popř. 
jako RAMdisk. 

ad c) Vstupy všech pouzder dynamic- 
kých pamětí RAM (kromě datových) 
jsou zapojeny paralelně. Adresové 
vstupy jsou připojeny na výstupy multi- 
piexerů adresy dynamické paměti (sig- 
nály ADRO až ADR7), vstupy RASN, 
CASŇ a WEN jsou připojeny na signály 
označené stejně. Datové vstupy jsou 
připojeny přímo na datovou sběrnici (DO 
až D7). Datové výstupy jsou připojeny 
na vstupy tří osmibitových registrů 
s nízkopříkonovými vstupy (3x MH 
3212). 1036 je použit jako vyrovnávací 
registr pro komunikaci procesoru 
s pamětí v cyklu čtení informace 
z paměti. Informace je do něj zapiso- 
vána signálem RASP, jeho výstup je na 
datovou sběrnici připojován signálem 
MREQ . RD . CSRAM, tzn. pouze 
v případě, že procesor čte z vnitřní 
paměti RAM. Obvod 1037 pracuje jako 
vyrovnávací registr jasu, obvod 1038 
jako vyrovnávací registr atributu. Do 
vyrovnávacího registru jasu se informa- 
ce zapisuje při ARDR1 . RASD, do 
vyrovnávacího registru atributu sig- 
— nálem ARDR1N . RASD. Informace 
z těchto registrů je synchronně přepi- 
sována do registrů displeje signálem 
LOADN, popř. LOAD. Registr jasu je 
tvořen osmibitovým posuvným regis- 
trem 74165, registr atributu dvěma 
pouzdry 7475. Výstup posuvného regis- 
tru ovládá výstupní multiplexery jasové 
informace displeje v závislosti na na- 
stavení nejvyššího bitu registru atribu- 
tu. Je-li tento bit (označovaný firemní 
literaturou jako příznak „FLASH") 
v úrovni log.O, je při výstupu posuvného 
registru v log.O přepnut multiplexer na 
jas papíru, v opačném případě na jas 
inkoustu. Pokud má příznak „FLASH" 
hodnotu log.1, je periodicky střídán jas 
papíru s jasem inkoustu a tak je 
zabezpečeno blikání v závislosti na 
výstupu obvodu 1044 (časovač 555) 
kmitočtem asi 2 Hz. Právě popsaným 
způsobem se vytváří obrazová informa- 
ce za podmínky SCRN = log.O, tzn. je 
zobrazována aktivní část informace. 
V opačném případě je zobrazován jas 
borderu přepnutím multiplexerů disple- 
je signálem SCRN. 


MREQ 

0 

RD 

WR 

RFSH 


2 * 

ů/A 

BH 

BV 

AB1A 

AB15 

ŠPĎ 

INIT 

RFSH 

SPI 



Obr. 4. Obvody řízení přístupu do dynamické pamětí RAM 

(1027 . 55 — 7400, 1024 — 7402, 1051^53 — 7404. 1026, 54 — 7410, 1050 — 7454. 
1047, 48 ■ — 7474) 
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Obr. 4a. časový diagram činností řídicích obvodů 


Stínová paměť ROM je tvořena 
dvěma pouzdry paměti PROM 74S287. 
Obsahuje program, který po spuštění 
nastaví registr videoRAM do oblasti, 
kde ji předpokládá ZX Spectrum. 

Poté se volá podprogram, pro- 
vádějící nahrání bloku o délce 16 kB od 
adresy 8000H a po jeho úspěšném 
nahrání pomocí výstupní operace 
OUT (1), A „shození" inicializačního 
klopného obvodu a tím vygenerování 
signálu RESET. Zároveň jsou vy- 
měněny obě poloviny paměti v adreso- 
vém prostoru mikroprocesoru a po 
skončení RESET začne program pro- 
bíhat od první instrukce nahraného 
bloku dlouhého 16 kB. V případě neú- 


spěšné nahrávky je provedena instruk- 
ce OUT (2), A. Vygenerovaný zápisový 
signál lze použít po prodloužení mono- 
stabilním klopným obvodem k upozor- 
nění obsluhy. Stínová paměť ROM je 
vybírána za podmínky splnění vztahu 
INIT . AB15N . MREQ .RD (3) 


ad d) Tyto obvody tvoří vlastně řídicí 
část obvodů, nahrazujících obvod ULA. 
Základem jsou obvody, zajišťující časo- 
vý multiplex přístupu do paměti a řízení 
vyrovnávacích registrů výstupu paměti. 
Pochopení jejich činnosti je nejsnazší 
z časového diagramu na obr. 4 a. 


Signál MREQ začíná vždy se sestupnou 
hranou hodinového signálu procesoru, 
má však různou délku. V případě 
obnovovacího cyklu trvá pouze jednu 
periodu, v případě čtení kódfu instrukce 
1,5 periody a v případě čtení či zápi- 
su dat do paměti 2 periody. 
K jednoznačnému určení časového 
okamžiku přístupu procesoru do pa- 
měti je použit pomocný klopný obvod 
D, jenž je nastavován nástupnou hra- 
nou signálu MREQ. Nulován je vzestup- 


mikroelektronika ’88 
















nou hranou signálu RASPN, čímž je 
zajištěno generování právě jednoho 
signálu RASP na každou žádost proce- 
soru o přístup do paměti. Výstupní 
signál tohoto klopného obvodu ozna- 
čme QMREQ. Signál RASP je pak 
generován podle rovnice: 

RASP = QMREQ . 

(RD + WR + RFSH).4> (4) 

Pokud je tedy paměf aktivována 
procesorem pro čtení, je informace 
čtena z vyrovnávacího registru, protože 
v době, kdy procesor čeká na data na 
datové sběrnici, není již paměf proce- 
sorem aktivována. Při zápisu obvody 
naopak čekají na příchod signálu WR, 
aby nebyla paměť zbytečně dlouho 
blokována. Obnovovací cyklus proběh- 
ne bez časového posunu, jen je na 
polovinu zkrácen. Je tedy zajištěno, že 
libovolná komunikace s pamětí bude 
trvat právě po dobu trvání signálu 
<j> v úrovni log. 1. Paměf je aktivována 
nejčastěji každou druhou periodu hodi- 
nového kmitočtu, zbývá tedy dost času 
pro komunikaci obvodů displeje 
s pamětí. 

Základním signálem, ovládajícím ča- 
sování obvodů displeje, je signál přepi- 
su informace do registrů displeje 
LOAD. Je generován ze signálu 2<t> a 
4>/4 tak, aby přicházel v první půlperio- 
dě hodinového signálu (* = log.O) po 
sestupné hraně 4>/4, začínal se sestup- 
nou hranou 2$ a trval asi 40 ns. 
Zpoždění je nutné, aby se ustálila 
informace ve výstupech čítačů horizon- 
tální adresy znaku, synchronizace se 
signálem 2® zabezpečuje plynulý pře- 
— Chod mezi znaky a délka trvání je pouze 
nezbytná pro reakci ostatních obvodů. 
Jeho časový průběh s ostatními signály 
je ukázán na obr. 4b. 
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Obr. 4b. Časové umístění signálu 
LOAON 


Signálem LjOADN je nastaven dvoubi- 
tový posuvný registr, tvořený dvěma 
klopnými obvody O (1040) do stavu 
11B. Jeho vstup je trvale připojen na 
log.O, informace v něm je posouvána 
vzestupnou hranou signálu RASDN, tj. 
po každém vyčtení bajtu pro displej: 
Vyšší bit udává adresu vyrovnávacího 
registru paměti, do kterého se bude 
zapisovat a zároveě ovládá muitiplexe- 
ry, přepínající adresu jasu na adresu 
atributu (1014, 1015). Nižší bit udává, 
zda je ještě nutno aktivovat vyčítání 
z paměti pro displej. Po příchodu LOAD 
se nejprve vyčte jas, poté atribut. Vyšší 
bit je označen AR0R1, nižší ARDRO. 
Signál RASO, udávající, že s pamětí ko- 
munikují obvody displeje, je tvořen po- 
dle rovnice: 


RASO * NON (QMREQ . (RO + WR 
+ RFSH) ).♦ . ARORO 



Signál RASN, ovládající přímo odpo- 
vídající vstupy dynamických pamětí 
RAM, je generován následovně: 

RAS=RASP+RASD (6). 

Signál DISP určuje s předstihem půl 
periody hodinového signálu, zda se 
bude komunikovat s pamětí kvůli poža- 
davku procesoru (log.O) nebo zda 
o přístup žádá displej. Je dán vztahem: 

DISP = NON (QMREQ . (RD + WR 
+ RFSH)) 

Pro přepínání multiplexerů adresy dy- 
namické paměti RAM je využit signál 
HHA, který dostaneme zpožděním sig- 
nálu RASN průchodem třemi Invertory. 
Zpoždění, vzniklé na těchto inverto- 
rech, spolu se zpožděním signálů na 
muttiplexerech, zcela vyhovuje potře- 
bám dynamických pamětí a není třeba 
jej vyrábět pomocí pasivních Článků 
RC, s jejíchž nastavováním bývají potí- 
že. 

Dáte je třeba mít k dispozici signál, 
určující, zda se v daném okamžiku 
bude zobrazovat jasová informace vy- 
tvořená obvody displeje nebo jas bor- 
deru. K tomuto účelu je využit signál 
SCR: 

SCR = NON (BV + QBH) (8). 

kde QBH označuje výstup klopného 
obvodu D, na jehož datový vstup je 
přiveden signál BH a je do něj přepiso- 
ván vzestupnou hranou signálu LOAD. 
Tento klopný obvod musí totiž kom- 
penzovat zpoždění signálů, vzniklé na 
vyrovnávacích registrech paměti. 

Pro ovládáni dynamické paměti RAM 
je nutný ještě signál WEN. Při jeho 
vytvořeni musíme mít na paměti, zda 
můžeme povolit zápis do části paměti, 
kde je u normálního Speetra umístěna 
paměf ROM, či nikoliv. Je vhodné mít 
možnost toto programově ovládat po- 
mocí signálu, který si označíme SPO: 

WE « RASP . WR (AB14N + AB15N 
+ SPO) (9). 

Signál SPO můžeme totiž připojit na 
výstup pomocného klopného obvodu 
nebo na systémový konektor a progra- 
mově povolovat možnost zápisu do 
nejnižšich 16kB. V tom případě je však 
nutno zakázat zápis ještě před odepnu- 
tím cínové paměti ROM. Za podmínky 
SPO - log.O je zápis zakázán. Na 
obr. 4 jsou ještě obvody, zajištující 
tvorbu signálu CSRAM podle rovnice 
( 2 .) 


ad e) Každý mikropočítač je třeba 
nějak ovládat K tomu slouží základní 
periférie — klávesnice, zobrazovací 
jednotka (v našem případě TV displej), 
zvukový měnič pro upozornění obsluhy 
a základní vnější paměf pro uchování 
dat (magnetofon). Klávesnice je připo- 
jená obdobným způsobem jako 
u Speetra — horních osm bitů posílené 
adresové sběrnice je přes diody zapo- 
jeno na osm vodorovných řad klávesni- 
ce (každá řada je rozdělena v polovině 
na dvě). Pět svislých sloupců (každý 
sloupec má osm tlačítek) je zapojeno 
na spodních pět bitů vstupního portu 
s adresou OFEH. Podrobně je to vidět 
na ebr. 5. Protože port OFEH je 


obousměrný a potřebuje mít možnost 
zapamatovat pět bitů ve výstupním 
směru, je použito dvou obvodů 3216, 
jednoho čtyřbitového registru 7475 
a jednoho klopného obvodu D. 
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Obr. 5a. Úprava adresace 


TV displej je ovládán z podstatné části 
signály, vytvářenými podle obr. 3. 
Z portu OFEH je k nim přidána pouze 
informace o barvě borderu (signály 
BRB, BRR a BRG). Komunikace 
s magnetofonem je realizována po 
dvou vodičích. Signál pro nahráváni je 
posílán po vodiči označeném MGFIN 
a čten z vodiče MGFOUT. Reproduktor 
je ovládán signálem REPRO. Pomocí 
základní logiky jsou vydekódovány 
ovládací signály pro port OFEH takto: 

CSFEH = IOREQ . ABON . AB1 '. AB2 
. AB3 . AB4 . AB5 . AB6 . AB7 (10). 

Protože originální Spectrum používá 
k adresování tohoto portu pouze ABO, 
pro případnou plnou kompatibilitu je 
putno výběrový signál vytvořit násle- 
dovně: 

CSFEH = IOREQ . ABON 

Lze to jednoduše udělat vynecháním 
1054 a následného ínvertoru, nebo za 
tento invertor zapojit přepínač, kterým 
by se místo pevného spojení tohoto 
invertoru s vstupem hradla NAND mo- 
hlo volit mezi výběrovým signálem 
podle (10) a (1 1). Úprava je znázorněna 
na obr. 5a. Dále na obr. 5 je nakreslen 
obvod 8255 (1065), který slouží pro 
připojení tiskárny a ovládače. Protože 
obsahuje tři využitelné programovatel- 
né vstup- výstupní brány, lze jej použít 
samozřejmě i k dalším aplikacím. Jeho 
brány jsou do adresového prostoru 
zařazeny takto: 


brána: 

adresa: 

CW (řídící) 

1CH (26D) 

A 

1FH (31 D) 

B 

1EH (300) 

C 

1DH (29D) 


Je vidět, že adresa portu A je stejná 
jako adresa vstupního portu pro 
ovládač Kempston. Protože po zapnutí 
napájecího napětí je obvod 8255 na- 
programován do vstupního módu pro 
všechny brány, nemusí se ani přepro- 
gramovávat, pokud chceme použít pro- 
gram pro tento typ ovládače. Je vhodné 
upozornit, že tento obvod není součástí 
originálního Speetra, ale prakticky 
každý uživatel dříve či později narazí na 
nutnost připojení nějaké , periférie 
k mikropočítači. Z tohoto důvodu byl 
tento obvod zahrnut přímo do základní 
sestavy navrhovaného mikropočítače. 
Porty jsou vyvedeny na uživatelský 
konektor. 
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Obr. 5. Připojení periférií 

(1055 — 7400, 108, 53, 57 — 7404, 1056 — 7408, 1062 — 7474, 1061 — 7475, 1058- 
— 7430, 1059, 60 — 3205, 1063, 64 — 3216, 1065 — 8255) 


ad f) Po několika vyzkoušených varian- 
tách obvodů připojujících TV displej 
a magnetofon byly realizovány obvody, 
jejichž schéma je na obr. 6. Jsou 
z mnoha typů autorem vyzkoušených 
zapojení nejjednodušší bez snížení kva- 
lity a zejména s nejnižšími nároky na 
seřizování. 


Výstup na magnetofon má mírné 
zdůraznění vyšších kmitočtů při na- 
hrávání. Toto jednoduché opatření při- 
neslo překvapivé zlepšení spolehlivosti 
čtení záznamu na jiných magnetofo- 
nech, než byl záznam pořízen. Vstupní 
komparátor je realizován jedním inte- 
grovaným komparátorem, který má 


zavedenu malou hysterii. Za předpo- 
kladu kvalitního vstupního signálu pra- 
cuje spolehlivě již od mezivrcholové 
úrovně signálu 200 mV. Protože vstupní 
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Obr. 6. Připojení televizního displeje a magnetofonu 


a výstupní signál nejsou spojeny, ne- 
projevuje se vazba mezi nimi (nedo- 
chází k ní). Můžeme tedy magnetofon 
provozovat s trvale zapojenými oběma 
kabely a nebo jej spojit přímo pětiko- 
líkovou nahrávací šňůrou (pozor, 
u některých magnetofonů zahraniční 
výroby s jinak zapojenými výstupy než 
udává naše norma nemusí toto propo- 
jení fungovat, tehdy je nutno použít 
sluchátkový výstup). 


TV displej je připojen přes dva 
tranzistory a součtovou odporovou ma- 
ticí. Jasový signál je vytvořen sečtením 
signálů R, Q a B, což jsou barevné 
složky, signálu přijasení BRIGHT. SCR 
a signálu synchrosměsi SYNCN. Signál 
přijasení je použit v součinu se sig- 
nálem udávajícím aktivní část obrazov- 
ky z toho důvodu, aby nemohlo dojít 
k přijasení borderu. Jednotlivé barevné 
složky signálu jsou vedeny z výstupů 
multipíexerů na odporové trimry, kte- 
rými se nastaví jasový příspěvek jed- 
notlivých barev. Signál synchrosměsi je 
přičítán přímo bez odporového děliče. 
Signál přijasení je přičítán přes tranzis- 
tor p-n-p. Jinak by se totiž těžko 
dosáhlo zobrazení formátu Spectra, 
protože tam signál BRIGHT zvyšuje 
kontrast zobrazení a úroveň černé 
zůstává konstantní. Sečtené signály 
jsou převedeny na malou impedancí 
emitorovým sledovačem, který má 
v emitoru potenciometr. Výsledný vi- 
deosignál je odebírán z běžce poten- 
ciometru v pozitivní polaritě. Potencio- 
metr byl použit, aby bylo možné vyrov- 
nání citlivosti různých monitorů. 

Reproduktor je připojen na signál 
REPRO vůči +5V přes potenciometr, 
umožňující regulaci hlasitosti. Je vhod- 
né použít reproduktor o co největší 
impedanci. 
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TABULKA t. 1 


I SYSTÉMOVÝ KONEKTOR 

FRB 62 

KLÍC: E3 


1 A0 

2 AI 

3 A2 

4 A3 

5 Á4 

6 AS 

7 AG 

8 A7 

9 A8 

10 A9 

11 A10 

12 A11 

13 A12 

14 A13 

15 A14 

16 A15 

17 DO 

18 Dl 

19 02 

20 03 

21 04 

22 05 

23 06 

24 D7 

25UCC 

26 GND 

27 IORQN 

28 RON 

29 MREQN 

30 WRN 

31 HATLN 

32 RFSHN 

33 MIN 

34 BUSAKN 

35 NMIN 

36 BUSRON 

37 INTN 

38 RESETN 

39 WAITN 

400 

41 ABO 

42 SPI 

43 AB2 

44 AB1 

45 CS(10-17)N 

46 CS (20-27)N 

47 CS(28-2F)N 

48 CS (30-37)N 

49 CS (38-3F>N 

50CS3N 

51 CS4N 

62 CS5N 

53CS6N 

54CS7N 

55 DBO 

56 DB1 

57 DB2 

58 DB3 

59DB4 

60 DBS 

61 066 

62 OB7 


UŽIVATELSKÝ KONEKTOR 

FRB 30 

KLÍC: E5 


1 UCC 

2 GNO 

3 PA7 

4 PAG 

SPAS 

6 PA4 

7 PA3 

8 PA2 

9 PA1 

10 PAO 

11 PC7 

12 PC6 

13PC5 

14PC4 

15 UCC 

16 GND 

17 PC3 

18 PC2 

19 PCI 

20 PCO 

21 PB7 

22 PBG 

23PB5 

24 PB4 

25 PB3 

26 PB2 

27 PB1 

28 PBQ 

29 UCC 

30 GND 


4. MECHANICKÉ PROVEDENÍ 


Prototyp byl postaven na dvou uni- 
verzálních deskách s plošnými spoji 
rozměru „Velká eurokarta", sešroubo- 
vaných nad sebe. Na spodní desce je 
umístěn kompletní mikropočítač, na 
horní je tlačítková klávesnice, obvody 
připojení MGF, TV, reproduktor a mik- 
rospínače RESET a NMI. Jsou zde také 
konektory připojení napájecího zdroje, 
monitoru a magnetofonu. V případě 
dalších dvou kusů, které byty sestave- 
ny, byly obvody 3212 nahrazeny obvo- 
dy 8282 a do získaného prostoru bylo 
umístěno připojení TV a MGF. Obě 
desky jsou propojeny 30-ti vývodovým 
konektorem FRB, postaveným „nasto- 
jato“. Systémový konektor je FRB62, 
uživatelský FRB 30, oba dva jsou na 
základní desce. Zapojení jejich vývodů 
je v tabulce 1. 

Při umístění desek v malé vzdálenos- 
ti nad sebou se součástky na spodní 
desce příliš zahřívají. V průběhu 2 až 
3 hodin dojde k přehřátí a tím i k havárii 
systému. Je nutné zajistit nucené chla- 
zení vzduchem, proudícím mezi deska- 
mi. K boku spojených desek je připev- 
něn amatérsky zhotovený větrák, 
vhánějící vzduch mezi ně. Motorek má 
z kazetového magnetofonu a válcovou 
vrtulku s listy z PVC folie. Je napájen 
přímo z počítačového rozvodu +5V. 
Toto chlazení stačí zcela k udržení 
teploty součástek v únosných mezích 
prakticky neomezeně dlouhou dobu. 

Klávesnice je zhotovena ze 40 spína- 
cích tlačítek WK 55929 s amatérsky 
zhotovenými hmatníky z Eprosinu. Mo- 
hou se použít i libovolná jiná spínací 
tlačítka, mikrospínače nebo mem- 
bránová klávesnice. 


s. součástky, oživen! 
a uveden! do provozu 


Jak již bylo řečeno v úvodu, jedinými 
typy součástek, které nebyly na trhu 
v době realizace prvního vzorku (leden 
1987) byt procesor UA880D a paměti 
typu 4164 s dobou přístupu pod 150 ns. 
V prototypu byl použit procesor 
UB880D, který byl vyzkoušen na hodi- 
novém kmitočtu 3,5 MHz a paměti NEC 
D4164C-12 se zaručenou dobou přístu- 
pu 120 ns. Protože není v silách běžně 
vybaveného amatéra určit mezní kmito- 
čet procesoru, případný zájemce by 
měl použit procesor se zaručeným 
mezním kmitočtem vyšším než 
3,5 MHz. V úvahu přicházejí typy 
UA880D a Z80A. Má-li někdo možnost 
vybrat z více kusů obvodů UB880O, je 
vhodné to udělat pomocí měření 
zpoždění signálů řídící sběrnice za 
hodinovým signálem a vybrat kusy s co 
nejmenším zpožděním. Některé série 
(značeno zespodu obvodu) bývají 
vhodné prakticky celé, jiné jsou zase 
skoro celé pomalejší. 


Doba přístupu u paměti je výrobci 
značena v desítkách ns za pomlčkou, 
udávající typ obvodu. U konkrétního 
obvodu je ovlivněna především teplo- 
tou čipu. Na tu má vliv zatížení výstupů 
a vstupní signály. Pokud budou dodr- 
ženy následující rady, je pravděpodob- 
né, že v počítači vyhoví i paměti 
s dobou přístupu 150 ns. Autor vyzkou- 
šel celkem čtyři čtveřice takovýchto 




pamětí od tří výrobců a všechny fungo- 
valy bezchybně. Především je nutno co 
nejméně zatěžovat datové výstupy pa- 
měti — v konstrukci jsou připojeny na 
každý výstup tří vstupy obvodu 3212. 
Přestože někteří výrobci udávají zatíži- 
telnost až dva vstupy TTL, není vhodné 
paměti provozovat takto zatížené. Dále 
je vhodné vstupy nepřipojovat přímo, 
ale přes sériové rezistory řádu desítek 
ohmů (27 až 56 ohmů). Dynamická pa- 
měf je totiž vnitřní strukturou blízká 
analogovým obvodům a tímto opatře- 
ním dále zmenšíme její příkon. 

Stavbu je vhodné začít základním 
oscilátorem 7 MHz, jehož kmitočet na- 
stavíme čítačem. Dále oživíme čítače 
adresy displeje a obvody vytvoření 
synchronizačních impulsů. Pokud nyní 
zapojíme sčítací obvod pro video, na 
monitoru bychom měli dostat zasyn- 
chronizovaný obraz obdélníku. Nyní za- 
pojíme procesor, zesilovač adresové 
sběrnice, inicializační obvody a obvody 
řízení přístupu do dynamické paměti 
RAM. Při nezasunutém procesoru do 
objímky zkontrolujeme tvorbu signálů 
RASD, RAS, UOAD, HHA, ARDR1 a 
ARDRt. Signály RAS a RASD by měly být 
vždy dva po signálu LOAD, pak zase po 
dobu dvou period by neměl být signál 
RAS ani RASD aktivován. Nyní zkontro- 
lujeme tvorbu signálu LOAD. Nemáme- 
li k dispozici osciloskop, lze to udělat 
i pomocí připojeného TV displeje. Je-li 
délka impulzů, vytvářených derivačním 
článkem RC nevyhovující, na displeji 
nebude obdélník čistý nebo nebude 
vůbec. Na místo kondenzátoru 150 pF 
dáme kondenzátor 82 pF a jeho kapaci- 
tu postupně zvětšujeme, nakonec 
.použijeme kondenzátor $ asi o 20 až 
30 pF větší kapacitou, než byla nej- 
menší vyhovující. Většinou to bude 120 
nebo 150 pF. Je-li vše v pořádku, zasu- 
neme procesor do objímky a znovu 
zkontrolujeme signály včetně signálů 
RASP, a WE. Zapojíme multipiexery 
adresy paměti a zkontrolujeme časově 
zpoždění CAS za RAS. Odpovídá-lí po- 
volenému zpoždění, udávanému výrob- 
cem, postupujeme dále, jinak jej upra- 
víme vkládáním nebo vypouštěním su- 
dého počtu invertorú ve zpožďovacím 
řetězci. Toto by se ale nemělo stát Po- 
kud zpoždění nesouhlasí, zkontroluje- 
me napájecí napětí přímo na vývodech 
integrovaných obvodů. Zpoždění totiž 
závisí nejvíce právě na napájecím na- 
pětí. 

Dále pokračujeme zapojením vyrov- 
návacích registrů paměti, registry dis- 
pleje, multipiexery displeje a pamětmi 
RAM a PROM. Před zasunutím paměti 
RAM do objímek zkontrolujeme na- 
pájecí napětí (mají +5V na vývodu 
8 a OV na vývodu 16). Nakonec zapo- 
jíme obvody připojení periferií a obvod 
8255. Zasuneme paměti PROM a zapo- 
jíme napájecí napětí, na obrazovce 
bude nějaký pravidelný pravoúhlý 
obrazec (pruhy, šachovnice) v Černé 
a přijasené bílé. Polovina pamétových 
buněk se po zapnutí napájecího napětí 
totiž překlopí do log.O a polovina do 
tog.1. Obrazec závisí na vnitřní struktu- 
ře paměti. 

Po připojení magnetofonu a jeto 
spuštění by měl začít problikávat bor- 
der. Indikující nahrávání. Můžeme zku- 
sit nahrát obsah originální paměti 
ROM, který jsme již dříve nahráli 
ze Spectra příkazem SAVÉ „ROM** CO- 
DE 0,16384. Po skončení nahrávání by 


měla proběhnout inicializační rutina 
a vypsat se úvodní hlášení. 

Pokud jsme se úspěšně dostali až 
sem, zbývá už pouze nastavit trimry 
jednotlivých barevných složek jasu. Dá 
se to udělat pomocí pomocného pro- 
gramu, například takovéhoto: 

10 FOR 0 TO 1 
20 FOR P=' 0 TO 7 
30 PRINT PAPER PjBRIGHT B,*“ «; 

40 NEXT P 
50NEXT B 
00 GO TO 10 

Po spuštění tohoto programu se na 
obrazovce zobrazí 16 jasově odliše- 
ných pruhů, přičemž prvních osm je od 
černého po bílý nepřijasených a druhá 
polovina je přijasena. Pomoci odporo- 
vých trimrú nastavíme stupnici Šedi. 
V řádku 30 zkušebního programu 
změníme počet mezer ze dvou na 
šestnáct a zkontrolujeme konstantní 
úroveň černé bez i při přijasení. Pokud 
vizuálně nesouhlasí, nastavíme ji 
změnou odporů 5,6 kn a 8,2 kn. Tímto 
je nastavení počítače skončeno. 


Závěrem bych chtěl zdůraznit, že 
stavba mikVopočítače patří k složitým 
záležitostem v amatérských podmín- 
kách a je vhodná pouze pro vyspělé 
amatéry, mající dostatečné zkušenosti 
s číslicovou a mikroprocesorovou tech- 
nikou. Je vhodné nepodcenit takové 
„banálnosti", jako se zdá rozvod 
a blokování napájecího napětí. Na 
schématem to není naznačeno, ale je 
použito asi 40 blokovacích keramic- 
kých kondezátorů a 15 tantalových 
kapek 47 jiF. Z vlastní trpké zkušenosti 
dodávám, že to není přehnané opatře- 
ní. Nesmí se také podcenit průřez 
napájecích vodičů, protože odběr 
obvodů TTL je značný. 


Tento mikropočítač nebyl od začátku 
stavěn s úmyslem postavit kopii Spec- 
tra, pokud by se ke stavbě chystal 
někdo s tímto úmyslem, doporučuji mu 
koupit si originál. Smyslem stavby bylo 
vytvořit mikropočítač jednoduše rozší- 
řený se širokými možnostmi ovládání 
periferních zařízení a přitom využít 
obrovské knihovny programů na ZX 
Spectrum. 


Výpis paměti PROM je na straně 2911! 


Použité integrované obvody 

MH7400 — 3 ks (1023,27,55) 
UCY7402 — 1 ks (1024) 

MH7403 — 2 k» (108,7) 

MH7404 — 8 ks (105,8,51,52,53,57) 
UCY7408 — 2 ks (1022,56) 

MH7410 — 2 ks (1026,54) 

MN7430 — 1 ks (1056) 

MH7454 — 1 ks (1050) 

MH7474 — 4 ks (102,47,48,82) 
MH7475 — 3 ks (1040,41,61) 
UCY7486 — 1 ks (1025) 

MH7493 — 5 ks (109,10,11,12,13) 
UCY74123 — 1 ks (1021) 


UCY74153 — 7 ks 

(1018,17,18,19,20,45,48) 

UCY74157 — 2 ks (1014,15) 
UCY74165 — 1 ks (1039) 

MH74S287 — 2 ks (1042,43) 

MH3205 — 2 ks (1059,60) 

MH3212 — 5 ks (t03^l,36^7,38) 
MH3216 — 2 ks (1063,64) 

MHB8255A - 1 ks (1065) 

NE555 - 1 ks (K>44) 

Z80A CPU - 1 ks (tOl) 

4164-12 — 8 ks 

(1028^9,30,31, 32^3,34^5) 

MAB311 — 1 ks (1049) 


Úprava desky AND-1 
SAPI-1 

Ing. Pavel Svare 

Pro použití mikropočítače SAPI-1 ke 
sběru a předzpracování dat je účelné 
používat dvojí jas zobrazovaných textů. 
Pro tento účel je možné upravit desku 
AND-1 takto: 



Přerušit spoj mezi výstupem 8 obvo- 
du D1D a vstupy 14 obvodu D2C 
a 4 obvodu D1D (značení podle 
průvodní dokumentace) a na výstup 
8 obvodu D1D napojit potenciometr 
3,3 kn (Pí) typ TP052C, jehož jezdec je 
připojen na bázi tranzistoru Vil. Po- 
tenciometr je vložen do krytu konekto- 
ru kabelu KB-06, který je součástí do- 
dávky bez dalšího uchyceni místo perti- 
naxové krytky, hřídel je zkrácena 
o 7 mm a osazena přístrojovým kno- 
flíkem WF24313. Na špičku 28 konek- 
toru TX 514 30-X2 je vyveden výstup 
8 (D1D) a na špičku 26 pak báze Vil. 
Program výstupu znaku na displej 
OUTDIS je třeba upravit vymazáním in- 
strukce CZ IPOZ na adrese 0C9EH (ne- 
bo vtažením 3 instrukcí NOP, pokud 
není možno přeadresovat). Při vloženi 
hodnoty COH do MODE je znak zobra- 
zován s normálním jasem, při vložení 
00H pak potlačeným jasem, který je 
možno plynule regulovat potenckáne- 
trem Pí. Ostatní modifikace zobrazení 
znaku zůstávají stejné (blikající, 
podtržený) pro potlačený jas. Velikost 
znaků je nyní jednotná — 5x7 bodů. 


Obr. 1. Úprava desky AND-1, tučně 

vyznačeny nové spoje mikroelektronika ’88 
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MODULOVÁ SESTAVA 

PRO MIKROPOČÍTAČ ZX SPECTRUM 




Ing. J. Doležal 

Příspěvek je určen pro ty zájemce o mikropočítačovou techniku a zejména 
majitele mikropočítače Sinclair ZX-Spectrum, kteří chtějí proniknout do tajů 
měřicí a regulační techniky pomocí mikropočítačů. 

Proto jaem navrhl, r e a lizo va l a odzkoušel následující modul y jed no tky , které je 
schopen při pečlivé prám post av it i z ačá tečník. 


adresování obvodu MHB 8255 


řídicí registr CWR 

127 

kanál A 

31 

kanál B 

63 

kanál C 

95 


K jejich ovládání není třeba rozsáh- 
lých znalostí strojového kódu mikro- 
procesoru Z80. V první fázi pokusů 
bohatě vystačí znalosti jazyka BASIC. 
Po odzkoušení modulů a získání prv- 
ních praktických zkušeností můžeme 
přistoupit i k pronikání tajemství pro- 
gramování ve strojovém kódu a tím 
vlastní komunikaci s periferním zaříze- 
ním urychlit Modulová koncepce 
umožňuje k modulu portů připojovat 
další libovolné jednotky. 


1. Modul PIO 


Tento modul obsahuje programova- 
telný periferní obvod MHB8255, který 
vytváří stykové rozhraní mezi mikropo- 
čítačem a dalšími obvody. Zapojení, 
které bylo zveřejněno v (1). se ukázalo 
vhodné i pro tento případ a bylo 
použito v podstatě beze změny. Proto 
nebudu uvádět popis zapojení ani 
tabulku nastavení kanálů. 

Pro toto zapojení byl ale navržen 
nový oboustranný plošný spoj o roz- 
měrech 107,5 x 60 mm, který je roz- 
měrově shodný s ostatními moduly. 
Tento modul se připojuje ke sběrnici 
mikropočítače přes konektor WK 
46580, nebo přes konektor FRB TY 
5176211 a redukci podle (2). Oba 
integrované obvody jsou zasunuty do 
objímek. Výstupní konektor pro připo- 
jování dalších modulů je typu FRB TX 
5183113. 

Schéma zapojení je na obr. 1, roz- 
místění součástek na desce s plošnými 
spoji na obr. 2, obrazec plošných spojů 
je na obr. 3 a 4. 

Po pečlivé prohlídce plošných spojů 
a případném proměření ohmetrem za- 
suneme do objímek integrované obvo- 
dy, modul připojíme na konektor sběr- 
nice a zapojíme počítač. Počítač by měl 
pracovat normálně. Nyní nastavíme 
PIO pomocí registru CWR do módu 
0 a do výstupního režimu příkazem 

OUT 127, 128. 

Pak zadáme 1 1NPUT X: PRINT X 
2 OUT 31: GOTO 1 
RUN 


Zadáváme střídavě 0 a 255 a na 


Nyní nastavíme PIO do vstupního 


č-dudvdiue Miiudvu u a cjj a na rsi it-i o~7 icc « — 

vývodech 41 až 55 by se míla střídavě ' >řlkazem OUT127, 155 a za- 

objevovat log. 0 a log. 1. Tímto způso- 


bem ověříme správnou funkci kanálu 
B (adresa 63 a vývody 1 až 15) 
a C (adresa 95 a vývody 27 až 35). 


Obr. 1. Schéma zapojení 
PíO 


Seznam m il lihk 


Polovodiče: 

101 

102 
TI 

Rezistory: 

R1 

R2 

R3 

R4 


MH3205 

MHB8255 

KC507 


10 LET X = IN 31 : PRINT X 

11 POKE 23692, 100 : GOTO 10 
RUN 10 


PA0 
PA1 
PAS 
PA 3 
PA 4 
PA 5 
PAG 
to PA 7 
JQ PB0 
PB1 
PB2 
PB3 
PB4 
PB5 
PB6 
PB7 
PC0 
102 PCI 
PC2 


R1 2,2 kn, TR1 12 

R2 56 kn, TR 112 

R3 330 kil, TR 112 « 

R4 10 kn, TR1 12 

Konstrukční části: 
oboustranný plošný spoj 
konektor WK465 80 
konektor FRB TX 518 3113 
objímka 2x 8 vývodů 6AF497679 
objímka 2x 20 vývodů TX 7875401 
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Na obrazovce se objeví sloupec nul. 
Budeme-li na vývody 41 až 55 střídavě 
přivádět log. 0 a log. 1, vždy se nám 
objeví na obrazovce číslo odpovídající 
této binární kombinaci. Stejně vyzkou- 
šíme i kanály B a C. 


MODUL PŘEVODNÍKŮ 
A/DaD/A 


' Na této desce je umístěn osmibitový 
aproximační převodník A/D a osmibi- 
tový převodník D/A. Stykový obvod 
MHB8255 $ těmito převodníky komuni- 
kuje v základním módu 0 a to převod- 
ník A/D kanálem A a převodník D/A 
kanálem B. Kanál C zůstává nevyužit. 



Popis zapojeni 


Obr. 3. Obrazec plošných spojů desky W501 modulu PtO — strana součástek 


Převodník A/D, použitý v tomto zapo- 
jení! vychází ze zapojení zveřejněného 
v [4]. Schéma zapojení obou převod- 
níků je na obr. 5. Převodník je tvořen 
osmibitovým aproximačním registrem 
MHB1502 (105), který generuje všech- 
ny řídicí signály převodníku A/D 
s postupnou aproximací. Registr je 
řízen hodinovými impulsy z dvojice 
monostabilních klopných obvodů UCY 
74123 (102). Ve funkci převodníku D/A 
je užit integrovaný obvod MDAC08 
(104). Tento obvod má zaručenou dife- 
renciální nelinearitu ±1 LSB a dobu 
ustálení 85 až 150 ns. 


ob 000*004 


••"t r 





3* 


Obr. 4. Obrazec plošných spojů desky WS01 modulu PtO — strana bez součástek 


100n X ' 00n 




MDAC08 




91 

91 

91 

m 


R5 A/D 


105 

MHB1502 


Pro komparaci vstupního proudu 
převodníku A/D a výstupního proudu 
převodníku D/A je užit komparátor 
MAC111 (107) se zesílením 2.10 4 5 a 
dobou zpoždění 200 ns. Referenční 
zdroj napětí +10 V je osazen stabili- 
zátorem MAC01 (103). Převodník A/D 
v tomto zapojení pracuje v asynchron- 
ním režimu. To znamená, že hodinový 
kmitočet 1300 kHz je přiveden na vstup 
CL 105. 

Po připojení převodníku na napájecí 
napětí se na vývodu CC objeví log. O, 
která je přivedena na vstup S a uvede 
aproximační registr do výchozího sta- 
vu. Vzestupná hrana hodinového im- 
pulsu ho pak spustí. V převodníku D/A 
se výchozí číslicový signál převede na 
odpovídající proud, který se pak kom- 
paruje v komparátoru MÁC1 11 (107) se 
vstupním proudem převodníku A/D, 
daným jeho vstupním napětím a odpo- 
rem rezistoru, určujícího jeho rozsah. 


106- 1 106-2 


4 Obr. 5. Zapojeni modulu převodníků 
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Vstupní napěťový rozsah je dán 
rezistorem R3 a odporem trimru P3, 
kterým se nastavuje zesílení ope- 
račního zesilovače 108. Rezistor R5 má 
pouze ochranný charakter. 

Výstupní signál komparátoru, přive- 
dený na vstup D aproximačního regis- 
tru, je následujícím hodinovým impul- 
sem přepsán na sériový výstup DO. 
Takto je určen nejvýznamnější bit čísli- 
cového signálu (MSB). Současně výstup 
Q7 přejde do úrovně L a celý cyklus se 
opakuje. S příchodem deváté náběžné 
hrany hodinového impulsu je určen 
nejméně významný bit (LSB). Přechod 
signálu CC z úrovně H do L ukončí 
dobu převodu a zapíše číslicovou infor- 
maci z výstupu aproximačního registru 
do vyrovnávacích registrů, tvořených 
dvěma MH7475 (101 a 102) kde je 
uchována po dobu dalších devíti hodi- 
nových impulsů. Doba převodu je 
6,6 ms. S příchodem náběžné hrany 
nového impulsu se aproximační registr 
opět spustí a celý proces se opakuje. 
Derivační člen, tvořený rezistorem R6 
a kondenzátorem C4 spolu s MH7404 
(109) vytváří impulsy do výstupního 
registru (obr. 7). 

Převodník D/A 

Převodník D/A je na této desce 
realizován monolitickým násobícím čís- 
licově-analogovým převodníkem 

s proudovým výstupem MDAC08 
(1010). Zapojení je v druhé části obr. 5. 
Výstupní proud převodníku D/A závisí 
jednak na osmibitovém vstupním slovu, 
jednak na vstupním referenčním prou- 
du, nastaveném rezistory R9 a R10. 
Vzhledem k tomu, že tento obvod již byl 
popsán v (5), zmíním se o něm velmi 
stručně. Doba ustálení převodu je 
150 ns. Proudový výstup z převodníku 
se pomocí rezistoru R1 1 a operačního 
zesilovače MA741CN (1011) převádí na 
napěťový. Požadované výstupní napětí 
v bodě 5 nastavíme změnou zesílení 
operačního zesilovače. Odporový trimr 
Pí umožňuje definitivní nastavení vý- 
stupního napětí. Vzhledem k tomu, že 
stykový obvod MHB8255 je již vybaven 
vyrovnávací pamětí, nemusíme ji 
v tomto zapojení používat. Zdroj refe- 
renčního napětí, osazený 103, je pro 
oba převodníky společný. 

Konstrukční uspořádání 

Oba převodníky jsou na společné 
desce o rozměrech 107,5 x 60 mm 
s oboustrannými plošnými spoji. 
V horní části desky je umístěn konektor 
FRB TY 5176211, kterým se připojí 
modul převodníků k modulu PIO, lOI 
až 103, 107 a 109 jsou připájeny 
k plošným spojům, 104 až 106, 108, 
1010 a lOII jsou zasunuty do objímek. 
Vzhledem k tomu, ža 108 a 101 1 mají 
po 2x 4 vývodech a jsou umístěny na 
desce vedle sebe, lze pro ně použít 
jednu společnou objímku. Do měřicích 
bodů 1 až 5 lze připájet dutinky 
z konektoru FRB, nebo pájecí špičky. 
Výstupní vývody jsou vytvořeny z plo- 
šek 5 x 5 mm a lze do nich zanýtovat 
pájecí očka, nebo k nim vývody pouze 
připájet Rozmístění součástek na des- 
ce s plošnými spoji je na obr. 6, 
průběhy signálů na obr. 7, obrazec 
plošných spojů na obr. 8. a 9. 
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Obr. 6. Rozmístění součástek na desce s plošnými spoji W502 převodníků 



107,5 J 

Obr. 8. Obrazec plošných spojů desky W402 převodníků — strana součástek 



Obr. 9. Obrazec plošných spojů desky W502 převodníků — strana bez součástek 


Obr. 7. Průběhy 
signálů v měřicích 
bodech 


0,76 us 
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Oživování můžeme rozdělit na dvě 
etapy. V první etapě pracujeme bez 
počítače pouze s měřicím přístrojem 
typu AVOMET a s logickou sondou. 
Desku připojíme na napájecí napětí 
+5 V, ±15 V. Po připojení napájecího 
napětí zkontrolujeme jejich přítomnost 
v požadovaných bodech. 

Převodník A/D 

104 až 106 a 108 zasuneme do 
objímek. Po připojení napájení zkontro- 
lujeme v bodě 3 přítomnost hodinových 
signálů. Správnou funkci aproxi- 
mačního registru si ověříme v bodě 1 , 
kde musí být hodinový kmitočet dělený 
devíti (viz obr. 7). Správnou funkcí 
derivačního článku ověříme v bodě 2. 

Na vstupech A až D výstupních 
registrů MH7475 musí být střídavý 
průběh, na výstupech Q A až Q 0 pak 
log. 0. (přivedeme-li na vstup IN libo- 
volné kladné napětí O až 10 V, pak 
střídavě log. O a log. 1). Měřicím 
přístrojem zkontrolujeme napětí +10 V 
v bodě 4. V bodě 6 bychom měli 
naměřit asi 0,7 V. 


Převodník D/A 

IO10 a lOII zasuneme do objímek 
a připojíme napájecí napětí. Na vývody 
5 až 12 IO10 přivedeme lojj. 1. Změnou 
odporu P2 nastavíme zesílení lOII tak, 
aby v bodě 5 bylo výstupní napětí 
+10 V. Střídavým přiváděním log. 0 na 
vývody 5 až 15 1010 se výstupní 
analogové napětí v bodě 5 bude 
zmenšovat nebo zvětšovat. 

V druhé etapě připojíme tento modul 
— k oživenému modulu PIO a zapneme 
počítač. 

Příkazem OUT 127, 144 nastavíme 
kanály A a B obvodu MHB8255 do 
vstupního a výstupního režimu. Dále již 
můžeme pracovat s programem, který 
byl použít pro kontrolu funkce 
MHB8255. 

Pro zkoušení převodníku A/D přive- 
deme kladné proměnné napětí 0 až 
10 V na vstup IN a zadáme RUN 10. Při 
správné funkci převodníku se nám na 
obrazovce v závislosti na vstupním 
napětí objevují čísla 0 až 255. Změnou 
odporu P3 nastavíme zesílení obvodu 
ták, aby vstupnímu napětí +10 V odpo- 
vídalo na obrazovce číslo 255. 

Při zkoušení převodníku D/A připo- 
jíme do bodu 5 měřicí přístroj, který 
přepneme na rozsah 60 V. Po zadání 
RUN (za předpokladu, že máme 
v paměti uložen program pro zkoušení 
obvodu MHB8255) a čísla 255, by se 
nám výchylka měřicího přístroje měla 
ustálit na hodnotě 10 V. Přesněji nasta- 
víme změnu odporu P2. 

Pro následující zkoušku propojíme 
svorky IN a OUT, Pí nastavíme na 
maximální hodnotu a zadáme následu- 
jící program: 

1 OUT 127, 144 

2 INPUT X: PRINT X 

3 OUT 63. X 

4 LET Y - IN 31 : PRINT Y 

5 POKE 23692, 100 : GOTO 2 

Po RUN zadáme libovolné číslo 
v rozsahu 0 až 255. Počítač toto číslo 
vyšle do převodníku D/A, ten odpovída- 
jící analogovou hodnotu vyšle do pře- 
vodníku A/D, kde dojde k zpětnému 
převodu na číslicovou hodnotu, který 
se zobrazí na obrazovce. Při správném 
nastavení by rozdíl neměl být větší než 
jeden bit. 


Použftf 

Ve spojení mikropočítače s převod- 
níky lze realizovat jednoduchý číslicový 
regulátor P nebo Pl i v jazyce BASIC. 
Doba vzorkování je v jazyce BASIC 
vlivem překladu do strojového kódu 
delší (600 jis), přesto se domnívám, že 
pro řadu aplikací plně vyhoví. Při práci 
ve strojovém kódu mikroprocesoru se 
doba vzorkování zkrátí a můžeme po- 
čítač použít i pro případy, kde vyžadu- 
jeme rychlejší odezvu při regulaci. 
Pomocí popsaného regulátoru může- 
me ovládat motorek, osvětlení, nebo 
topení. Vstupní veličinou bude napětí 
z tachodynama, odporu fotoodporu, 
nebo termistoru. 

Naměřené parametry převodníků 
v jazyce BASIC: 

převod D/A 7,5 ms 

převod A/D s tiskem na obrazovku 

60 ms 

převod A/D bez tisku na obrazovku 

15 ms 


Seznam součástek 


Polovodiče 


lOI, 102 

MH7475 

103 

MAC01 

104, IO10 

MDAC08 

105 

MHB1502 

106 

UCY74123, 74123 PC 

107 

MÁC1 11 

108, lOII 

MA741CN 

109 

MH7404 

Rezlstory 

R1. R2, R9, 

4,7 kQ, TR1 12 


R10 

4.7 kn, TR 112 


R3, R5, R7, 

R8, R11 

5,6 kQ TR 112 


R6 

4700, TR 112 


Kondensátory 
Cl, C7 až C9 

0,1 nF, TK783 


C2, C3 

33 nF, TK783 


C4 

680 pF, TK783 


C5, C6 

150 pF, TK783 


Odporové trimry 


Pí 

22 kn, TP096 


P2 

10 kQ, TP095 


P3 

3.3 kO, TP095 


Mechanické a konstrukční součásti 
objímka 2x8 vývodů 6AF49769 

5 kusů 

pájecí špička 


5 kusů 

konektor FRB TY 517 6211 

1 kus 

deska s plošnými spoji 

1 kus 


3. Modul RAM 13 kB 


Operační systém řady mikropočítačů 
je umístěn pevně v paměti ROM. Má to 
své výhody i nevýhody. Mezi nesporné 
výhody patří nižší cena paměti ROM 
a ta skutečnost, že po zapnutí počítáte 
a jeho počáteční inicializaci máme 
okamžitě k dispozici operační systém. 
Mezi nevýhody patří to, že tento ope- 
rační systém (OS) je uzavřený celek, do 
něhož již nelze zasahovat. V tomto 
příspěvku řeším náhradu paměti ROM 
moderními statickými paměťmi RAM. 
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Jsou „posazeny" do adresní ho prosto- 
ru původní paměti ROM a lze do nich 
přesunout operační systém. Přepína- 
čem lze volit buď ROM s původním OS. 
nebo RAM s upraveným OS. Při umís- 
tění OS v RAM máme možnost (příkazy 
POKE) přepisovat obsahy paměťových 
buněk a tím si například předefinovat 
tabulku znaků pro jiný druh písma, 
odstranit chyby v OS (např. NMI), nebo 
do volných a nevyužitých prostor uložit 
další programy, např. pro obsluhu 
tiskárny, dálnopisu atd. Vzhledem 
k malému příkonu pamětí (při napáje- 
cím napětí 2 V jednotky až desítky 
mikroampér), je na tomto modulu 
umístěn záložní zdroj, složený ze dvou 
kusů knoflíkových článků 1,5 V. 

Po odpojení mikropočítače od sítě 
jsou tak paměti v pohotovostním reži- 
mu a program nebo data zůstávají 
uloženy v paměti i nadále. Po zapnutí 
počítače jsou opět k dispozici. 

Popis zapojeni 

V popisovaném zapojení jsou jako 102 
a 103 použity statické paměti typu RAM 
6264 S organizaci 8192 x 8 bitů. 
Vzhledem k tomu, že pro původní 
paměť ROM je vymezen prostor 16 kB, 
je nutné tyto paměti přepínat po blo- 
cích 8 kB. Paměť 102 je adresována 
v prostoru O až 8 kB, paměť 103 
v prostoru 8 až 16 kB. Adresový deko- 
dér je tvořen pamětí MH74S287 (lOI). 
Přepíná paměti RAM po 8 kB . dynamic- 
ky blokuje signál ROMCS a RAMCS. 
Umožňuje tři základní režimy, které 
jsou dány počtem pamětí 6264, které 
máme k dispozici. Modul můžeme 
osadit pouze jedním kusem, nebo 
dvěma kusy. Pro všechny tři druhy 
provozu je již dekodér naprogramován 
a volí se pouhým přepojením vstupů 
E a F dekodéru na log. O, nebo log. 1 
(tah. 3). 

Před zapnutím počítače je nutné 
předem rozepnout spínač S1. Dekodér 
přepne blok pamětí do prostoru 48 až 
64 kB (popř. 48 až 56. nebo 56 až 
64 kB) paralelně k vnitřním dynamic- 
kým pamětem. Pomocným programem 


Tab. 3. Programovací tabulka MH74287 


vstup-adresa 

výstup 

rozsah 

dec 

hex 

bin 

4GFEDCBA 

74 Y3 Y2 Y1 

HEX 

0 

00 

0000 0000 

1 

0 

0 

1 

9 

OažSkB 

1 

01 

0000 0001 

0 

1 

0 

1 

5 

8až 16kB 

2 

02 

00000010 

1 

1 

0 

0 

c 


13 

OD 

0000 1101 

i 

i 

ó 

ó 

č 


14 

OE 

00001110 

1 

0 

1 

0 

A 

48 až 56 kB 

15 

OF 

00001111 

0 

1 

1 

0 

6 

56 až 64 kB 

16 

10 

00010000 

1 

1 

0 

0 

C 


17 

11 

0001 0001 

0 

1 

0 

1 

5 

8až16kB 

18 

12 

00010010 

1 

1 

0 

0 

C 


30 

1E 

0001 iiio 

i 

i 

0 

0 

cT 


31 

1F 

0001 1111 

0 

1 

1 

0 

6 

56 až 64 kB 

32 

20 

00100000 

1 

0 

0 

1 

9 

0 až8kB 

33 

21 

00100001 

1 

1 

0 

0 

C 


45 

2D 

0010 iioi 

i 

i 

0 

0 

Č 


46 

2E 

0010 1110 

1 

0 

1 

0 

A 

48 až 56 kB 

47 

2F 

0010 1111 

1 

1 

0 

0 

C 


48 

30 

00110000 

0 

0 

0 

0 

0 


255 

FF 

1111 liti 

0_ 

_0 

_0 

_0 

Ó 
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Tab. 4. Pomocný program pro překlad OS 
do RAM ___ 

a) ve strojovém kódu mikroprocesoru 280: 

8000 21 FF 3F LD HL, 3F FF 
8003 ti FF FF LD DE, FF FF 
8000 01 FF FF LD BC, FF FF 
8009 ED B8 LDDR 

800BC9 RET 

b) v jazyce BASIC 

1 CLEAR 39000 

2 FOR n = 0 TO 11 

3 READ r- PRINT f 

4 POKE (4000 + n), y 

5 NEXT n 

« DATA 33, 2SS, 83, 17, 2SS, 2SS, 1, 255, 
285. 237, 184, 281 


(Tab. 4) se blok prvních 16 kB paměti 
ROM přemístí do posledních 16 kB 
paměti RAM (48 až 64 kB). Sepnutím 
spínače S1 (vstup D = log. 0) dojde 
k přepnutí dekodéru do rozsahu 0 až 
16 kB, k dynamickému zablokování 
paměti ROM signálem ROMCS = log. 1 . 
a k odblokování vnějších pamětí RAM 
v rozsahu 0 až 8 a 8 až 16 kB. 

Po tomto přepnutí původní program 
zůstane i nadále v posledních 16 kB (48 
až 64 kB). Lze jej smazat nebo nahradit 
jiným programem. Rozpojíme-li opět 
spínač S1 a přepneme vnější paměť 
zpět, je nutné (pokud jsme před tím 
provedli RESET, vypnutí počítače, ne- 
bo došlo ke zhrouceni programu 
s následnou inicializací počítače) pře- 
dem zadat CLEAR 47000 (posunutí 
RAMTOP a vymezení prostoru pro 
data). 

V předchozím popisu funkce nebylo 
nutné zasahovat do počítače. Budeme- 
li ale chtít po připojení vnější paměti 
RAM do prostoru 48 až 64 kB blokovat 
vnitřní paměť RAM a v ní zachovat 
původní obsah (data nebo programy ve 
strojovém kódu), musíme zavést dy- 
namické blokování paměti RAM sig- 
nálem RAMCS. Mikropočítač ZX-Spec- 
trum na rozdíl od svého předchůdce 
ZX-81 nemá tento signál vyveden. 
Bude to tedy znamenat zásah do 
počítače. Tím získáme jednou provždy 
možnost zablokovat vnitřní paměť 
32 kB (tvořenou osmi obvody 4532) 
a připojovat si na sběrnici pomocí 
konektoru další bloky paměti RAM 
nebo EPROM a ty pak libovolně podle 
potřeby přepínal Přerušíme spoj ve- 
doucí z vývodů 3 a 4 1023 (SN74LS32) 
na vývod 4 bloku pamětí K>15 až 1022 
(4532) a nahradíme ho rezistorem 

680 n. 



Obr. 14. Úprava ZXSpectrum pro 
vyvedení RAM CS 


Vývod rezistoru směrem k pamětem 
4532 propojíme s volným kontaktem 
výstupního konektoru. Při pohledu ze- 
zadu na ZX-Spectrum je to v horní řadě 
na levé krajní pozici (obr. 14 a 15). 


A11 1 

I RAMCŠ 

A9 1 

1 A10 

BUSAK 1 

1 A8 

ROMČS 1 

1 řFsh 

44 1 

| Mí 

45 1 

1 -12 V 

A6 1 

1 *12 V 

47 1 

1 WAIT 

RESET 1 

1 *5 V 

BUSŘŮ 1 

1 WR 

U 1 

1 RD 

V 1 

I I0REQ 

Y 1 

I MEMŘÉČ 

VIDEO 1 

1 HALÍ 

0 v I 

1 NMI 

IOROGE 1 

1 ÍŇT 

A3 1 

1 D4 

421 

1 D3 

4? 1 

1 DS 

A0 1 

1 D6 

CK 1 

1 02 t 

OV 1 

1 Dl ti 

•3 0V 1 
3* 

I DO 5 

& 9 VI 

1 8 

i 5Vl 

1 07 B 

iš A12 ] 

1 A13 2 

</> 

AU % 

1 A15 

1B 

1A 


Obr. 15. Vyvedení RAM CS na konektor 
mikropočítače 



Obr. 16. Náhrada dvou spínačů jedním 
dvoupókfvým přepínačem 


Správnou funkci dekodéru a bloko- 
vání si ověříme. Do objímky lOI zasu- 
neme naprogramovanou paměť 
MH74S287, objímky 102 a 103 zůsta- 
nou volné. Paměť MH74S287 je přepo- 
jena do režimu 48 až 64 kB. Po zapnuti 
počítače zadáme příkaz PRINT PEEK 
23732 + 256* PEEK 23733. Na obrazov- 
ce se objeví 49151 , což je konec paměti 
RAM. ObjevMi se 65535, je někde 
chyba a máme ji odstranit. Po zasunuti 
obou pamětí RAM se po zadání před- 
chozího příkazu má správně objevit 
65535. To znamená, že počítač s no- 
vou pamětí komunikuje. 

Po této úpravě při zapojení vnější 
paměti do rozsahu 48 až 64 kB bude 
vždy vnitřní paměť v tomto rozsahu 
zablokovaná a její obsah zachován. 
Budeme-ti chtít zablokovat vnější pa- 
měť RAM, rozepneme spínač S3. Log. 
1 na uvolňovacím vstupu SI MH74S287 
zablokuje dekodér a výstupy přivede 
do třetího stavu. Spínače SI a S3 lze 
nahradit jedním třípolohovým dvoupó- 
lovým přepínačem (Obr. 16), který 
umožní v poloze 1 rozsah 48 až 64 kB, 
v poloze 2 dojde k zablokování vnější 
paměti a v poloze 3 rozsah 0 až 16 kB. 








Obr. 1 1. Rozmístění součástek na desce s plošnými spoji WSQ3 modulu RAM 



Obr. 12. Obrazec plošných spojů desky W503 modulu RAM — strana součástek 


107,5 


i 



Obr. 13. Obrazec plošných spojů desky W503 modulu RAM — strana bez 

součástek 


Jak již bylo řečeno v úvodní části 
popisu, lze během provozu počítače 
měnit pomocí příkazu POKE obsah 
vnější paměti RAM i po přepnutí do 
rozsahu 0 až 16 kB. Zde však u prvního 
bloku 0 až 8.kB dochází k vynulování 


paměťových buněk na adresách AO až 
A4, které je zřejmě způsobeno neúpl- 
ným dekódováním adresové sběrnice 
v ULA, která generuje v tomto rozsahu 
signál řídicí sběrnice RD/WR. Protože 
se předpokládá, že je zde připojena 


paměť, ze které se pouze čte, nevadí to. 
Nahradíme-li však paměť ROM pamětí 
RAM, začne to vadit. Nedostatek lze 
odstranit úplným dekódování adresové 
sběrnice (všech šestn áct vodičů) 
a zablokováním signálu WR v tomto 
rozsahu. To však znamená použít řadu 
IO navíc. 

Tento problém lze jednoduše obejít 
tak, že pro provoz vnější paměti RAM 
v rozsahu 0 a ž 8 k B zvolíme spínačem 
S4 (rozepnut) WR = log. 1) režim čtení. 
Režim zápisu (S4 je sepnut) zvolíme 
přepnutím S1 do roataahu 48 až 56 kB 
Příkazy POKE budeme používat pouze 
v tomto rozsahu. Má to i tu výhodu, že 
při rozepnutém spínači S4 chráníme 
obsa h paměti před vymazáním. Signál 
WR lze přepínat pouze pro první paměť 
RAM v rozsahu 0 až 8 kB a druhou mít 
trvale připojenou na signál WR 
a zapisovat do ní i v rozsahu 8 až 16 kB, 
nebo signál WR spínačem S4 přepínat 
pro obě společně a i do druhé vstupo- 
vat pouze v rozsahu 56 až 64 kB. V 
tab. 2 jsou uvedeny požadované funkce 
spínačů. 


Tab 2. 


81 

stránka rozsahu 0 až 16, 48 až 64 kB 

82 

propojka — nastaveni pozice paměti RAM, 


jedná, nebo dva kusy 

83 

zablokováni dekodéru a paměti RAM 

12 

zablokováni zápisu do vnéjSfch paměti 

■ 

RAM 


Na pozici lOI je ve funkci dekodéru 
paměť PROM MH74S287 s třístavovým 
výstupem. To znamená, že při neaktiv- 
ním signálu ROMCS a RAMCS rezisto- 
ry R1 a R2 zajišťují ha výstupec h Y1 
a Y2 log . 0 a při neaktivním signálu CS1 
a CS2 rezistory R3 a R4 na výstupu Y3 
a Y4 log. 1. Rezistory R5 až R8 při 
rozpojených spínačích zajišťují na pří- 
slušných vstupech log. 1. Rezistor R11 
umožňuje dobíjení napájecího článku 
v době provozu počítače. Diody Dl 
a D2 oddělují signál ROMCS a RAMCS, 
vystupující z počítače. Dioda D3 za- 
braňuje vybíjení článku při vypnutém 
počítači a D4 zabraňuje propojení 
napájecího napětí na napájecí článek. 

Programovací tabulka je v Tab. 3. 
Pro režim 0 až 16 kB je program na 
adresách 0 až 15, a na vstupy E až 
H obvodu MH74S287 je přivedena log. 
0 (spojeno se zemí). 

Pro režim 8 až 16 kB je program na 
adresách 16 až 31, na vstup E je 
přivedena log. 1 přes rezistor R6 a na 
vstupy F až H log. 0. 

Pro režim 0 až 8 kB je program na 
adresách 32 až 47, na vstup F je 
přivedena log. 1 přes rezistor R6 (volí 
se propojkou popř. přerušením plošné- 
ho spoje) a na vstup E a G až H log. 0. 
Zbývající prostor na adresách 48 až 255 
zůstává volný a lze ho případně použít 
pro jinou dekódovací tabulku. 

Konstrukční provedeni 

lOI až 103 jsou zasunuty v objím- 
kách. Ostatní součástky jsou zapájeny 
v plošných spojích. Knoflíkové články 
typu S105 0 16x6 mm jsou zasunuty ve 
dvou pouzdrech o 0 18/1,5 mm a výš- 
ce 5,5 mm, která jsou podle obr. 11 
přilepena lepidlem EPOXY 1200 
k plošnému spoji. Bronzový pásek 
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o tloušťce 0,4 mm, který je k základní 
desce připevněn dvěma šrouby M2, 
drží tyto články v pouzdrech a zajišťuje 
jejich vzájemné propojení. 

Přepínače S1 , S3 a S4 jsou miniatur- 
ní, a lze je zakoupit v NDR. K plošnému 
spoji jsou připevněny úhelníkem 
z hliníkového plechu. S3 je tvořen 
propojením, popř. přerušením plošné- 
ho spoje. 

Celý modul RAM je k mikropočítači 
ZX-Spectrum připojen konektorem 
WK 46 580, nebo přes redukci kone- 
ktorem FRB TY 517 6211. 

Schéma zapojení je na obr. 10, 
rozmístění součástek na obr. 11, obra- 
zec plošných spojů na obr. 12 a 13, 
úprava počítače ZX-Spectrum na 
obr. 14 a zapojení výstupního konekto- 
ru na obr. 15. Na obr. 16 je schéma 
zapojení jednoho přepínače místo S1 
a S3. 


Programové vybavení 

K tomuto modulu byly odladěny dva 
programy, které umožňují spolupráci 
modulu RAM s mikropočítačem (pro- 
gram v Tab. 5) a demonstrují možnost 
použití (Tab. 6). 

První část programu, uvedeného v 
Tab. 5, po zadání příkazu RUN přeloží 
OS do paměti RAM v rozsahu 48 až 64 
kB. Tento překlad se provede 
i v případě, kdy není k mikropočítači 
připojen vnější modul RAM. Je-li připo- 
jen, je nutné, aby byl spínač S4 sepnut 
a S1 přepnut do rozsahu 48 až 64 kB. 
Po překladu se vytiskne v prvním 
sloupci desítkový výpis obsahu bloku 
prvních 16 kB, včetně adres, v druhém 
výpis přeloženého bloku včetně adres 
+ 49152. Tuto část programu lze 
kdykoliv použít (po zadání RUN 15) ke 
kontrole obsahu pamětí RAM v přípa- 
dech, kdy došlo ke zhroucení progra- 
mu a nemáme jistotu, že původní 
obsah paměti zůstal zachován. Přepi- 
sujeme-li příkazem POKE některé 
adresy, můžeme je tímto způsobem 
kontrolovat. 


Třetí část programu (zadání RUN 40) 
porovnává obsah jednotlivých adres 
v rozsahu 0až16a48až64kBa tiskne 
odchylky. Oceníme ji v případech, kdy 
nechce mikropočítač s modulem spo- 
lupracovat. Tento případ může nastat 
při neopatrné manipulaci sS4 v rozsa- 
hu 0 až 16 kB, nebo při provozu ze 
záložní baterie (modul k ní byl delší 
dobu připojen a došlo k poklesu na- 
pětí), kdy může dojít k chybám na 
některých adresách a potřebujeme 
rychlou kontrolu. Při provozu se též 
ukázalo potřebné v některých přípa- 
dech ponechat počítač s připojeným 
modulem po zapnuti několik desítek 
sekund v klidu a pak s ním teprve 
komunikovat. 


Program v Tab. 6 na jednoduchém 
příkladu demonstruje použitelnost to- 
hoto modulu. Umožňuje předefinovat 
tabulku méně často používaných sym- 
bolů a značek za písmena české abe- 
cedy. Zapisuje se stejně, jak bylo 
uvedeno v předchozí části. Volbou 
bloku přepínačem S1 lze volit OS 
s původní, nebo s opravenou abece- 
dou. 

Seznam součástek 


Polovodiče: 

101 

102 
103 

VD1, VD2 

VD4 

VD3 


MH74S287 

6264 

6264 

KA 261. 262, 501 
KY 130 


Rezistory: 
R1, R2 
R3, R9 
R10 
R11 


470 0, TR1 12 

5.6 kO, TR1 12 
12 kO, TR1 12 

4.7 kO, TR1 12 


Konstrukční části: 

konektor WK 46580 1 kus 

objímka 2x 8 vývodů 6AF49769 1 kus 

objímka 2x 14 vývodů TX 787 522 2 kusy 

deska s plošnými spoji oboustranná 1 kus 

knoflíkový článek 1,5 V typ S105 2 kusy 

přepínač miniaturní páčkový 3 kusy 


Napájecí zdroj 

Přesto, že v minulých číslech AR se 
objevila celá řada návodů na napájecí 
zdroje, uvádím zde pro úplnost popis 
jednoduchého a univerzálního zdroje 
pro napájení modulu převodníků. Po 
úpravě (vyvedení napětí +9 V) by bylo 
možné využít ho k napájení celého 
mikropočítače. 


Popis zapojení 


Popisovaný zdroj je osazený třemi 
integrovanými stabilizátory typu 
MA78xx, napájenými ze dvou samo- 
statných usměrňovačích bloků. Tyto 
bloky jsou osazeny dvěma dvojicemi 
usměrňovačích diod typu KY940 
a KY950. V případě většího odběru 
a nebezpečí přehřívání je možné opatřit 
je chladiči. Tyto diody jsou schopny 
s chladičem snést proud maximálně 
3 A. 

Jeden blok napájí stabilizovaný zdroj 
+5 a +15 V (popř. +9 V), druhý -15 V. 
Dioda D5 indikuje zapnutí zdroje a je 
připojena přes svorku č. 7 na první blok 
zdroje. Podle potřeby ji lze připojit 
přímo na výstup některého stabilizáto- 
ru (přes rezistor). 


Konstrukční uspořádání 

Napájecí zdroj je umístěn včetně 
síťového transformátoru na jedné des- 
ce s plošnými spoji. V uvedené kon- 
strukci byl použit síťový transformátor 
s jádrem El 25 x 25 a jeho navíjecí 
předpis je na obr. 18. K desce 
s plošnými spoji je přišroubován přes 
distanční sloupky šrouby M4. Vývody 
jednotlivých vinutí jsou připojeny ke 
svorkám 1 až 6. lOI a 102 jsou 
umístěny na jednom společném chla- 
diči, 103 je na druhém. Stabilizátory 
jsou společně s chladiči přišroubovány 
přes distanční sloupky k desce 
s plošnými spoji a jejich vývody jsou 
přímo připájeny do plošných spojů. 


Tak. 5 Přaklad OS do RAM 


Tak. 6. Nové takulka snakfi 


t REM PŘEKLAD OS DO RAM 

2 CLEAR 39000: PRIMT " PŘEKLAD OS" 

3 FOR 11=0 TO 1 1 

4 RKAD Y: PRIMT Y:« " 

5 POKE (40000+N) ,Y 

6 MEXT II 

7 DATA 33,255,63,17,255,255,1,255,255,237,184,201 

8 KAMDCMIZE USR 40000 
10 PAUSE 50: CLS 

12 STOP 

15 PRIMT "VYPISPAMETI" 

18 PRIMT 

20 PRIMT " 

22 PRIMT 

25 FOR H=0 TO 16383 

30 PRIMT H;" ";(K+49152) í" "jPEEK 

";PEEK (M+49152) 

35 NEXT H 

36 STOP 

40 PRIMT * TEST CHYBY" 

41 PRIMT " " 

42 FOR H=0 TO 16383 

43 LET C=K+49152 

44 LET A=PEEX M 

45 LET B=PÉEK C 

46 IF A=B THEN GO TO 48 

47 PRIMT M;" ";C;" ";PEEK N;" *;PEEK C 

46 NEXT N 

49 PRIMT" TISK S10Q" 


1 PRIMT " NOVA TABULKA ZNAKU" 

2 PRIMT "« 
nnauiuH " 

3 FOR N=64776 TO 64847 

4 READ A 

5 POKE N,A 

6 NEXT N 

7 DATA 8,16,56,4,60,68,60,0,0,36,36,0,0,0,0,0.40,16,56,68,120 
,64,60,0,0,8,62,40,62,10,62,6,8,16,0.48,16,16,56,0,8,16,68,68,68, 

éo, 4 , 5 ^, 8 , 16 , 56 , 68, 68,68, 56,0,8, 16, 56, 68, 120,64, 60, 0,40, 16, 28, 32, 
32,32,32,0 

10 FOR M=65024 TO 65031 
12 READ B 
14 POKE K,B 
16 NEXT M 

18 DATA 8,16,56,68,120,64,60,0 
20 FOR N=65240 TO 65279 
22 READ C 
24 POKE H,C 
26 Mra* K 

28 DATA 40,16,28,32,32,32,32,0,80,36,4,60.68.68,60,0,24,24,68, 

68.68.68.56.0 . 0.16.56.84.16.16.16.0 . 8 . 16. 68 . 08 . 08 . 68 . 56.0 . 

30 FOR N=65496 TO 65535 

32 READ D 
34 POKE K,D 
36 NEXT M 

38 DATA 40,16,16,56,16,16,12,0,40,16,56,64,56,4,120,0,40,16,12 

4.8.16.32.124.0. 40.16.120.68.68.68.68.0.40.16.28.32.32.32.28.0 

40 FOR U =54592 TO 54599 

41 READ X 

42 POKE N,X 

43 NEXT N 

44 DATA 32,68,111,108,101,125,97,108 ' 

46 PRINT 

48 PRIMT " PŘELOŽENO " 

49 PRIMT TISK S100" 
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Obr. 21. čelní panel 
zdroje 


Obr. 22. Mechanické díly 
zdroje 

a — spodek skříně, b — wch skříně, 
c — chladič I, d — chladič II. 
e — distanční sloupky, f — distanční 
sloupky t ra n sfor mát or u , g — distanční 
podložka IO 



Deska s plošnými spoji je umístěna 
ve skříňce z hliníkového plechu a přes 
distanční sloupky k ní přišroubována. 
Na předním panelu je na levé straně 
konektor K1 (pětikolíková magnetofo- 
nová zásuvka) pro výstupní napětí, na 
pravě síťový vypínač spolu se signální 
diodou. Pojistka Pj je na zadní stěně. 
Schéma zapojení zdroje je na obr. 17, 
obrazec plošných spojů a rozmístění 
součástek na obr. 19 a 20, celková 
sestava na obr. 21 a výkresy mechanic- 
kých dílů na obr. 22. 

MdiaMCKe ony 


Skříňka, složená ze dna a krytu, je 
vyrobena z hliníkového plechu 
a tloušťce 1 mm. Po orýsovaní vy- 
vrtáme všechny otvory a díly ohneme 
do potřebného tvaru. U dna se nejdříve 
ohnou okraje a pak teprve přední 
a zadní stěna. Kryt je přišroubován ke 
dnu dvěma šrouby M3 a to shora. 
Skříňku lze po důkladném mechanic- 
kém očištění mořit v hydroxidu sodném 
(pozor na poleptání pokožky), nebo 
příslušné dfly nastříkat vhodnou nitro- 
barvou (SPRAY). Chladiče jsou též 
z hliníkového plechu. 

Seznam součástek 


Polovodičové součástky: 
iOI MA7805 

102, 103 MA7815 

01, D3 KY940 

02, 04 KY950 

D5 UQ1731 

Kondensátory. 

Cl, C2 500 nF/35 V, TE986 

C3 až CS 500 nF/15 V, TE984 

Rezistory: 

R 1 2.2 kn, TR 212, 151 atd. 

Konstrukční díly 

sffový vypínač 250 V/4 A — dvoupóíový 
pojistkový spodek REMOS 6 A 
trubičková pojistka 0,3 A 
chladič zdroje +5 V. +15 V 



chladič zdroje -15 V 
deska s plošnými spoji 
skříňka kompletní 

distanční sloupek pod sífový transformátor 
4 ks 

distanční sloupek pod desku 4 ks 
distanční sloupek pod s t abilizáto r 6 ks 
spojovací materiál (šrouby atd.) 
sffový transformátor 
flexošňúra tří pramenné 6 A 
konektorová zásuvka 


. wvereni tepioij 


Jako doplněk k modulu převodníků 
byl navržen a sestaven snímač teploty, 
kde ve funkci čidla byt použit moderní 
sensor.fy Siemens KTY10. Výhoda to- 
hoto sensoru spočívá v téměř lineárním 
průběhu v rozmezí —50 až +150 °C 
a v poměrně velké změně odporu 
v tomto rozsahu. 


Prodává se ve dvou třídách přesnos- 
ti, s odchylkou 5 % a 1 %. Na obr. 28 je 
uvedena kalibrační křivka verse 5% 
jak ji dodává fy Siemens, na obr. 27 je 
pro p oro vná ní uved e na křivka sensoru 
(zřejmé 1 %), který jsem měl k disposi- 
ci. 



Obr. 27. Kalibrační tabulka senzoru 
KTY 10 — 5 96, 1% 


22 


mikroelektronika *88 




R r [KOJ 



Obr. 28. Kalibrační křivka použi- 
tého senzoru 


Seznam součástek 


Polovodičové součástky 
O Z MAA741, MAA741 CN 

Rx KTY10 


Rezistory: 

R1 68 kn, TR162 

R2 12 kil, TR162 

R3 1,8 kO. TR162 

R4 10 kn, TR162 

R5 220 O, TP095 

R6, R7 100 kn, TR161, TR212 

R8 100 kn, TP095 

R9, R10 3,3 kn, TP095 

Kondenzátory 

Cl 0,1 ».F, TK783 

Konstrukční části: 
deska s plošnými spoji 


Přiklad použití 


Z popsaného modulu lze ve spojení 
s modulem převodníků realizovat jed- 
noduchý mikropočítačový teploměr. 

Bude-li obvod nastaven pro rozsah 

0 až 100 °C, což bude odpovídat vý- 
stupnímu napětí 0 až 10 V, bude pak 

1 bit = 0,04 V = 0,4 °C. Konstanta pro 
převod bude K = 0,4. Programově 
z portu přečtenou hodnotu vynásobíme 
touto konstantou a dostaneme teplotu 
již v °C. 

Pro uvedený obvod byl odladěn 
program v jazyce BASIC (Tab. 7), který 
se skládá ze dvou částí. 

V první části programu (po startu se 
stiskne 0) se čtou hodnoty z portu 
převodníku A/D a ukládají se příkazem 
POKE do paměti. Vzhledem k tomu, že 
údaj portu je osmibitový, stačí k jeho 
uložení do paměti pouze jedna adresa 
— z toho plyne, že je nutné vždy určitou 
Část paměti vyhradit pro data, která se 
ukládají do adresy 65533 směrem 




Z uvedených průběhu vyplývá, že 
v menším rozsahu teplot (0 až 100°C) 
— 50 až +50 °C lze dosáhnout velmi 
dobré linearity. Při měření uvedeného 
vzorku byla pro teploty 0°C použita 
ledová tříšf, pro vyšší teploty různé 
teplá voda. K měření teploty jsem 
použil termistorový teploměr PU 391/1, 
k měření odporu digitální multimetr 
M1T242. Maximální proud senzorem je 
20 mA. 


Existencí tohoto levného senzoru (1 
až 2 DM) začala nová éra měření teplot 
pomocí přenosných muttimetrů a digi- 
tálních voltmetrů. Stačí totiž takový 
multimetr rozšířit a zdroj konstantního 
proudu (stačí na to dva tranzistory) 
a přímo, bez jakékoliv linearizace měřit 
úbytek napětí na sensoru, který udává 
teplotu s přijatelnou přesnosti. Na 
obr. 23 uvádím jednoduché zapojení 
přímo ukazujícího teploměru s jedním 
operačním zesilovačem. 

Popis zapojeni 

Sensor KTY10 je zapojen v jedné 
větvi Wheastonova můstku, který je 
napájen kladným napětím +15 V. Můs- 
tek se zhruba vyváží rezistory R2 a R3, 
jemně pak nastavitelným rezistorem 
R5. Výstupní napětí se přivádí přes 
rezistory R6 a R7 na vstup 
2 a 3 operačního zesilovače. Rezistor 
R8 slouží k nastavení zesílení zesilova- 
če. Kondenzátor Cl zvětšuje stabilitu 
obvodu. Schéma zapojení je na obr. 24, 
rozmístění součástek na desce s ploš- 
nými spoji na obr. 25 a obrazec 
plošných spojů na obr. 26. 


Nastaveni můstku 


Změříme odpor sensoru při teplotě 
0°C a pak pokud možno při největší 
teplotě (80 až 100 °C). K nastavení 
obvodu použijeme dva nastavitelné 
rezistory 3,3 kn, typu TP095 apod. 
Rezistory si označíme 0°C a např. 
80 °C. Nastavíme je nejlépe na digitál- 
ním ohmetru na odpor, odpovídající 
daným teplotám. Na vstupní svorky 
plošného spoje, určené pro připojení 
sensoru KTY 10, připojujeme střídavě 
oba rezistory. Na vývod 6 operačního 
zesilovače připojíme voltmetr a připo- 
jíme modul na napájecí napětí ±15 V. 
Změnou odporu rezistorů R2, R3 a R5 
nastavíme nulovou výchylku (pro 0 °C). 
Zaměníme rezistor za druhý odpovída- 
jící např. 80 °C, a rezistorem R8 nasta- 
víme výstupní napětí na +8 V. Tento 
postup je nutné několikrát opakovat, až 
jsou odchylky minimální. Definitivně 
nastavíme obvod po připojení k desce 
převodníků trimrem P3. 


\ 

Konstrukční uspořádání 


Obvod pro měření teploty je umístěn 
na desce s plošnými spoji a je propojen 
s modulem převodníků čtyřpramen- 
ným plochým vodičem. Pro připojení 
sensoru KTY 10 jsou použity dutinky 
z konektoru FRB. Dvoupramenný kab- 
iík, na jehož konci je při pájen sensor, 
má na druhém konci dvě špičky 
z konektoru FRB tak, že tvoří miniaturní 
zástrčku. 



Obr. 25. Rozmístění součástek na des- 
ce W505 teploměru 
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Obr. 26. Obrazec plošných spojů desky 
W505 teploměru 
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Tah £ Obslužný program pro věření teploty 


1 REM HODINY ,MER£M TEPLOTY e ULOZEM DO PAMĚTI 

2 00T 127,144 

3 CLEAR 45000 :LET B=0 

4 PRIMT -ZVOL CTEM - 1 ,KEBO ZAPIŠ - 0":IMPUT F 

5 IP F*1 THEM GO TO 40 

6 PRUTT- ZADEJ ROZSAH PAMĚTI" ;IMPUT C:PRIKT C.65533-C 

7 PRIMT -ZADEJ CAS: HODINY A MINUTY" 

8 INPUT DíINFUT E 

9 POKE 65535, D:P0KE 65534, E 

10 PRIMT " CAS TEPLOTA" 

1 1 FOR H=D TO 23 

12 FOR N=E TO 59 
1 3 LET B=B+1 

14 LET X=IM 31 

15 POKE C65534-B) ,X 

16 PRIMT B," - ";H ;":";N,0.4*FEEK (65534-B) 

17 PAUSE 3000 

16 IF C~B TKEN STOP 

19 POKE 23692,100 

20 NEXT N 

21 LET E=0 

22 NEXT H 

23 LET D=0 

24 GO TO 10 

35 REM CTEM PAMĚTI 

40 PRIMT " CAS TEPLOTA" 

41 LET D=PEEK 65535 :LET E=PEEK 65534 

42 FOR H=D TO 23 

43 FOR M=E TO 59 

44 LET B=B*1 

45 PRIMT B;" - ";Hi";";M,0.4«PEBK( 65534-B) 

46 NEXT N 

47 LET E=0 

48 NEXT H 

49 LET D=0 

50 GO TO 42 


nahoru. V programu to zajišťuje příkaz 
CLEAR 45000. Proto pokyn programu 
pro zadání rozsahu paměti slouží spíš 
pro definování počtu měření tak (nesmí 
přesáhnout povolený rozsah paměti), 
aby nedošlo ke zhroucení programu. 

Hodnoty z portu se čtou každých 60 s 
(nastaveno příkazem PAUSE 3000). 
Změnou tohoto příkazu lze tuto dobu 
změnit. Odchylka po 24 hodinách činila 
30 s. Tento čas se zároveň zobrazuje 
v levé části obrazovky. Proto je nutné 
po startu programu vždy zadat sou- 
časný čas v hod. a minutách, který se 
uloží na adresy 65534 a 65535, kde je 
k dispozici pro zpětné čtení obsahu 
paměti. 

Druhá část programu (po zastavení 
se opět zadá RUN a stiskne 1) přečte 
počáteční čas (zobrazený v levé části 
obrazovky), a hodnoty od adresy 65533 
směrem nahoru, které po vynásobení 
konstantou se zobrazí v pravé části 
obrazovky již jako skutečné teploty 
v °C. 

Tento program názorně demonstruje 
použitelnost uvedené sestavy modulů 
s mikropočítačem při měření analogo- 
vých hodnot. Vzhledem k tomu, že 
zůstává kanál C volný, lze ho využít 
např. pro přepínání různých měřících 
bodů a uvedené sestavy použít pro 
snímání teplot nebo jiných veličin při 
různých měřeních v rozsáhlejších sy- 
stémech. Osvědčilo se použít modul 
RAM 16 kB (popsaný v části 3), do 
kterého (přepnut do rozsahu 48 až 
64 kB a napájen ze záložní baterie) se 
ukládala data z měření. Při výpadku 
napájení počítače tato data zůstala 
v paměti zachována. Je ovšem nutné 
před opětovným zapnutím mikropo- 


čítače rozpojit S4 (blokování signálu 
WR. 
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Připojení magnetofonu 
SM 260 jako paměťové 
jednotky k SAPI 

RNDr. Ing. Jaroslav Lhota 


Vzhledem k tomu, již delší dobu 
TESLA ELTOS DIZ nedodává k souboru 
SAPI kazetopáskovou jednotku jako 
vnější paměť, jsou uživatelé nuceni si ji 
opatřovat sami. Protože zápis dat na 
pásku se děje s dosti velkou rychlostí 
2400 Bd, je lépe zvolit kvalitnější kaze- 
tový magnetofon, jako např. TESLA 
SM260. Pro připojení magnetofonu lze 
použít poněkud upravený kabel KB-05 
dodávaný jako příslušenství SAPI 
a dále je nutno doplnit ovládací obvody 
magnetofonu, aby bylo možno soft- 
warově ovládat funkce „START 44 a 
„PAUSE 44 . 

Pro vstup dat z desky DSM-1 mikro- 
počítače SAPI do magnetofonu je 
vhodné použít vstup LINE (u starších 
výrobků ozn. UNIV), který povoleným 
rozsahem plně vyhoví. 

Přenosu dat z magnetofonu do po- 
čítače rovněž bez úprav vyhoví konek- 
tor DIN (dříve RÁDIO). 
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Pro dálkové ovládání lze s výhodou 
použít kompletního elektronického 
ovládání všech funkcí, jež je v magneto- 
fonu použito. Ovládací signál z desky 
DSM-1 ve formě úrovně (původně 
sloužící ke spínání napájení magneto- 
fonu) je nutné převést na signál ve 
tvaru záporného impulsu, neboť přive- 
dením úrovně na desku přepínačů by 
byla blokována činnost ostatních tla- 
čítek pro ruční ovládání. To je realizo- 
váno jedním integrovaným obvodem 
123 N (v poslední době byla dostupná 
sovětská verze K 155AG 3) v zapojení 
pole obr. 1. Časová konstanta obvodu 
je nastavena tak, aby po přivedení 
nulové úrovně na vstup A byl vygenero- 
ván záporný impuls délky asi 0,2 ms. 


což plně vyhoví ke spuštění příslušné 
funkce. Signál je přiveden paralelně 
k ovládacím tlačítkům a neomezuje 
jejich používání. Pro přenos ovládacích 
signálů ze SAPI do magnetofonu je 
použito volných špiček 1 a 4 konektoru 
LINE. Vlastní obvody podle obr. 1 jsou 
umístěny uvnitř magnetofonu a jsou 
připojeny k ovládacím obvodům mag- 
netofonu a zároveň napájeny přes 
konektorovou zástrčku na desce DO 
označenou 01. Tento konektor se na- 
chází za mechanikou magnetofonu 
a čísla špiček na obr. 1 odpovídají 
jejich pořadí na konektoru, počítáno 
shora. 
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2 I 


i I 

I i 

konektory SM260 


Obr. 2. 

Na obr. 2 je nakreslena potřebná 
úpravě kabelu KB-05. Připojení magne- 
tofonu je vyřešeno bez zásahu do jeho 
elektroniky a umožňuje tak bez omeze- 
ní i jeho běžné používání. 



Ing. Tomáš Navrátit 


Výhody sériového propojení mikropočítače s periférii není třeba zvlášť 
zdůrazňovat. 

Pro převod paralelního tvaru na sériovou posloupnost a naopak se zpravidla 
používá obvodu typu USART. Protože se však jedná o poměrně drahou 
součástku VLSI a její použití k danému účelu by bylo určitým přepychem, bylo na 
straně displeje pro převod použito zapojeni sestávající ze dvou 10 střední husto- 
ty integrace. 


Na straně mikropočítače je převod 
řešen jednoduchým programem. Tento 
podprogram převádí obsah akumu- 
látoru na sériovou posloupnost impulsů 
tak, že jednotlivé bity mají tvar podle 
obr. 1. Impuls přenášející hodnotu 
logické nuly má tvar 1, impuls přenáše- 
jící hodnotu logické jedničky má tvar 2. 
Při každém volání podprogramu je tedy 
vysílána sekvence osmi impulsů. 

Z důvodů maximální jednoduchosti 
jsou vypuštěny pomocné bity. Funkci 
start bitu přebírá první impuls. 

Impulsy se vysílají jedním z vývodů 
brány C obvodu 8255. Pro výkonové 
zesílení je použito zapojení z obr. 2. 

Sériovou linkou jsou impulsy přiváděny 
na vstup optočlenu (obr. 3). Rezistor 
— R1 slouží k nastavení proudu smyčky 
(20 mA). Dioda Dl chrání proti přepólo- 
vání a dioda D2 zvyšuje imunitu proti 
rušení tím, že propustí pouze impulsy 
o napětí větším než je Zenerovo napětí. 

Tranzistor TI spolu s polovinou lOI 
a rezistory R2 až R5 tvoří tvarovací 
obvod impulsů, které jsou po přechodu 
linkou zpravidla tvarově deformovány. 
Upravené impulsy jsou přivedeny na 
vstup zapojení (obr. 4) pro převod 
sériové posloupnosti na paralelní tvar 
(102 a 103) (přihláška o autorské 
osvědčení PV 6076-85). 

Čelem prvního impulsu se spustí 
monostabilní obvod 2a. Výstup 0 obvo- 
du 2a změní úroveň H na L. Tato změna 
způsobí spuštění monostabilního obvo- 
du 2b, _což se projeví změnou na 
výstupu Q obvodu 2b z úrovně H na L. 

Po uplynutí časového intervalu 
T p1 (určen hodnotami Cl a R6) se vrací 
stav výstupu Q obvodu 2a na úroveň H. 
Tato změna způsobí posun logických 
hodnot v posuvném registru 103 tak, že 
logické hodnoty na výstupech Q1 až Q8 

Tab. 1. 


-íH 



Obr. 1 



Obr. 2 

se posunou o jedno místo doprava a 
současně logická hodnota na vstupu 
&A se zapíše na výstup Q1. V případě, 
že pro 7-pi dodržíme podmínku: 

T ... viz obr. 1 

t p1 = T + 772 [1] 

dojde po každém čele vstupního impul- 
su a po opětovné činnosti 102a ke 
vzorkování délky daného impulsu a na 
výstupu Q1 103 se objevují logické nuly 
a jedničky v závislosti na tom, zda 
přišel na vstup C impuls průběhu 1 
nebo 2 z obr. 1 . 

časový interval ř p2 obvodu 102b 
(určený hodnotami C2 a R9) je zvolen 
tak, aby byl obvod znovu spuštěn. 
Výstup Q obvodu 102b přechází tedy 
po příchodu čela prvního impulsu na 
úroveň L a zůstává v tomto stavu po 
dobu vzorkování všech osmi impulsů. 
Při dodržení podmínky: 


,07 . PfiPS,ra.a3,P 3 , P1, gO 
ID.t. I Y IY lY jX IX IX IX] 


fp2 > 3T [2] 


signalizuje návrat výstupu Q obvodu 
102b z úrovně L na H, že právě došlo 
k převodu celé sekvence osmi impulsů 
(obdoba signálu „data platná"). 

Na výstupech Q1 až Q8 rezistoru 103 
se v tomto okamžiku objeví obsah 
akumulátoru mikroprocesoru. Pro další 
použití tohoto bajtu v logice displeje je 
jednotlivým bitům udělen význam po- 
dle tab. 1. 

Bity DO až D3 představují BCD hodnotu 
zobrazovaného čísla, bity D4 až D6 pozi- 
ci, na které je toto čí?lo zobrazeno 
s případnou desetinnou tečkou (bit B7). 

V prvním režimu, to znamená v době, 
kdy na vstup C nepřichází sériová 
posloupnost, je na vstupu L čítače 104 
úroveň H. Protože na vstup CU jsou 
přiváděny impulsy z generátoru tvoře- 
ného dvěma invertory (na kmitočtu 
v širokých mezích nezáleží), objevují se 
na výstupech A až C kombinace 1 až 8. 
Tyto kombinace jsou přivedeny na 
vstupy A až C dekodéru 108, takže na 
displeji jsou cyklicky spínány jednotlivé 
číslovky. Dále jsou stejné kombinace 
přivedeny na adresové vstupy A až 
C paměťových obvodů 105 a 106. 
Protože na vstupech W se nachází 
úroveň H, jsou obě paměti ve stavu 
čtení a na výstupech S1 až S4 se 
objevují obsahy jednotlivých páměťo- 
vých míst, které jsou po dekódování 
obvodem 107 cylicky zobrazovány na 
odpovídajících místech displeje. 

V paměti 105 jsou uchovány hodnoty 
osmi číslic, v paměti 106 hodnoty 
desetinných teček. Kapacita obou pa- 
mětí není příliš ekonomicky využita, 
jsou to však jedině dostupné paměti 
s vhodnou organizací pro tento účel. 

V druhém režimu se provádí zápis do 
paměti. Po převodu sekvence, v oka- 
mžiku, kdy Q obvodu 102b přechází 
z úrovně L do H, se uvede do 
činnosti obvod skládající se z D3 až 5, 
C5 až C7, R12, R13 a jednoho inverto- 
ru. Derivační člen C5, R12 vygeneruje 
na vstupu 9 obvodu IÓ1 kladný impuls. 
Výstup 8 přejde na okamžik na úroveň 
L. Prostřednictvím diody D5 se tato 
úroveň objeví také na vstupu L čítače 
104, což způsobí přepis výstupů Q5 až 
Q7 obvodu 103 na výstup čítače 104 
a zaadresování paměťového místa 
v 105 a 106. 


-[číslice v kódu BCD 

'000 — 1 . pozice zprava 
001 — 2. pozice zprava 
010 — 3. pozice zprava 
. 011 — 4. pozice zprava 

100 — 5. pozice zprava 

101 — 6. pozice zprava 
110 — 7. pozice zprava 
.111 — 8. pozice zprava 



{ desetinná tečka 

1 — sviti Obr. 3. 

0 — nesvití 
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Po určitém časovém okamžiku (po 
ustálení hodnot na výstupech 104) 
určeném členem D5, R13, C7 se úroveň 
L objeví také na vstupech W obvodů 
105, 106 a tím se do vybraného paméf- 
ového místa zapíší stavy na vývodech 
Q1 až Q4 a Q8 obvodu 103 (BCD 
hodnota číslice a desetinná tečka). Po 
odeznění záporného impulsu na výstu- 
pu 8 obvodu lOI se prostřednictvím 
diody 04 vrací stav na vstupech W 105 
a 106 ž úrovně L do H a za určitý časový 
interval určený členem R13, C6 se také 
stav na vstupu L 104 vrací z úrovně L do 
H. 

Dále se obnoví první režim, který trvá 
až do konce převodu další sekvence. 
Dioda 03 chrání vstup 9 103 proti 
špičkám záporné polarity. Spojení 
vývodu 8 lOI se vstupem BO obvodu 
107 zajišťuje zhasnutí displeje v době 
zápisu do paměti. 

Pro úplnost je třeba dodat, že použitá 
paměť (105, 106) poskytuje na výstupu 
negované hodnoty uchovaných dat 
Pro správnou činnost daného zapojení 
je třeba bity DO až 03 invertovat Bylo 
by možné použít čtyř irtvertorú, výhod- 
nější je však zařazení instrukce XRI OFH 
do dále popsaného podprogramu. 

Programové řešení převodu paralel- 
ního tvaru na sériovou posloupnost je 
v Tab. 2. Vstupním parametrem pod- 
programu je hodnota bajtu v akumu- 
látoru se stanoveným významem jed- 
notlivých bitů. Pomocný parametr RA- 
TE určuje délku časové prodlevy TNI. 
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Pro stanovení celkové doby T je 
potřeba sečíst doby trvání všech in- 
strukcí počínaje okamžikem nastavení 
výstupu na úroveň log. 1 do okamžiku 
nastaveni výstupu na úroveň log. 0. 

V daném případě 

T = (76 + 15 . RATE) . t [3J. 
t ... doba periody hodinových puisú 
(zpravidla 0J5 n&). 

Přenosovou rychlost (dobu T) je 
možné pomocí parametru RATE v širo- 
kých mezích měnit 

Tab. 2. Program převodu 


Na základě zvolené doby T je nutné 
určit hodnoty R6, R9, Cl , C2. 

Pro funkční vzorek byla zvolena hod- 
nota RATE = 32 (20 HEX). Dále byl zvo- 
len odpor rezistorú R6=39 OOQíl, R9>= 
® 39 000 íl. Pomocí vztahu fl), {2] 
a vztahu 

C = T /(K0NST1 .R.(1 + 0,7/R)) (4],kde- 
K0NST1 « 0,28 pro UCY74123 N, 

= 0,32 pro SN74123 N 

byly vypočítány Cl = 33,4 nF, 

C2 > 66,8 nF. 

Zvoleny byly C1= 33 nF. C2= 0,1 jíF. 


CONHENT* 

PROGRAMOVÝ SECHENT PROVÁDĚJÍCÍ PŘEVOD 
PARALELNÍHO FORMÁTU NA SÉRIOVOU 

POSTUPNOST BITU PRO VYSTUP POSTUPNOSTI JE POUŽITA 
6RAMA C OBVOOO 8235. VYSTUP NA BRANÉ JE OVLÁDÁN 
POMOCI ŘIDIČI BRANÝ CNT PŘEDPOKLÁDÁ SE POČÁTEČNÍ 
INICIALIZACE OBVODU 8255 NA REŽIM ©.» 


CNT EGU 7 

RATE EGU 32 

PUBLIC SER 10 
CSEC 

SERIO, Dl 

PUSU P9M 
PUSH 8 
PUSM O 
PUSH H 
NVI B.RATE 

MVI C.8 

XRI OFH 
CVKL RLC 

NOV M.A 
JC L0C1 


; ADRESA ŘIDIČI BRANÝ 
ř OBVODU 8255 

/HODNOTA URČUJI Cl RYCHLOST 
/VYSÍLANÍ POSTUPNOSTI 


/RYCHLOST VYSÍLANÍ 
i CO REC .B 

(8 POSTUPNÝCH ROTACI 
/BYTU DOLEVA 
/NEGACE BITU 08-03 
/ROTACE OBSAHU ACC 
/O JEDNO MÍSTO DOLEVA 
/POSUNUTY BYTE DO RÉC H 
/SKOK KDYŽ PŘÍZNAK CY-I 


LOCt 


SKOK. 


PÍ. 


ČALL Pt 
CALL P3 
CALL PS 
CALL P2 
JMP SKOK 


OCR C 
MOV A.H 
JNZ CYKL 
POP H 
POP D 


MVI A/83H 
OUT CNT 
RET 


/VYSÍLANÍ ItTULSU PRO PÁCE 1-1 

/TESTOVANÝ BIT » 8 


CALL Pt 
CALL PS 
CALL P2 
CALL PS 
JHP SKOK 


/VYSÍLANÍ IMPULSU PRO 
/TESTOVANÝ BIT -1 


P2. NVI A/D2H 

OUT CNT 
RET 

PS: NOV D.B 

TNI DCR D 

JNZ TNI 

RET 

END 


/VYROVNANÍ ČASOVÉHO ROZDÍLU 


/VRACENI POSUNUTÉHO BYTU DO ACC 
/UKONČENI PO OSNI ROTACÍCH 


/NASTAV VYSTUP NA LOC 1 


/NASTAV VYSTUP NA LOC O 
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/GENERACE ČASOVÉHO 
/USEKU TNI 










Seznam součástek 



Rezistory 


R1 

330OÍMLT — 0,25) 

R6\ R9' 

39 kil, TR 191 (TR 175) 

R2, R3 

22 kil TR212 

R4 

150 n 

R5 

3,3 kO 

R7, R14, 


R15 až R27 

2.7 kQ 

R8 

1,2 kO 

R10, R11 

1,2 kn 

R12 

470 0 

R13 

120 0 

R28 až R35 

2,2 kO 

R36 až R43 

39 O (MLT — 0,25) 

R44 až R59 

330 0 

Kondenzátory 


cr 

33 nF, TC216 

C2‘ 

0,1 |iF, TC2155 

C3 

15 nF, TK744 

C4 

33 nF. TK782 

C5 

10 nF, TK724 

C6 

4,7 nF. TK724 

Cl 

10 nF, TK724 

C8 až C12 

0,15 mF, TK782 

Polovodičové součástky 

Dl, D3 až D6 

KA221 

D2 

KZ260/6V8 

TI 

KSV71 

T2 až T17 

KSY82 

lOI 

MH7404 

102 

UCY 74123N 

103 

MH74164 

104 

MH74193 

105, 106 

MH7489 

107 

Dl 46 

108 

MH7442 

OP 

WK 16412 

Z1 až 28 

LO470 

viz text 




Obr. 8. Rozmístění součástek na desce 
s ploSnými spoji W507 displeje 


Konstrukce 


Displej je vestavěn v jednoduché 
krabici z hliníkového plechu. Sítový 
transformátor s usměrňovačem jsou 
umístěny mimo krabici. Na zadní stěně 
je stabilizátor MA 7805. Pro připojení 
sériové linky je použit běžný tříkolíkový 
konektor. 

Jako náhrada prokovených děr se mi 
osvědčil tenký pocínovaný drátek vlo- 
žený do otvoru a připájený z obou stran 
ke spoji. Při pájení nesmí do otvoru 
vtéci kalafuna, aby bylo možno násled- 
ně zasunout a připájet IO. Tímto způso- 
bem jsou připájený především číslicov- 
ky LQ470 (případně jejich objímky). 

Oba oboustranné spoje jsou po 
osazení přilepeny k sobě, propojeny 16 
vodiči a přišroubovány čtyřmi šrouby 
s distančními podložkami. Protože při 
případném kontaktu vodičů A až 
H s kostrou by došlo ke zničení 
číslicovek, doporučuji příslušná místa 
izolovat např. přilepením kousku 
odleptaného kuprextitu. 


Obr. 6. Rozmístění součástek na desce 
4 s plošnými spoji W506 zobrazovače 
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Uvedeni do diodu 


Logickou sondou zkontrolujeme, zda 
pracuje generátor impulsů (výstup 10 
lOI). V prvním režimu musí být na 
výstupu 8 lOI, vstupech 11 104, 3 105 
a 106, 4 107 úroveň H. Na výstupech A, 
B, C se objevují impulsy z generátoru 
dělené 2, 4 a 8. Tyto impulsy zkontrolu- 
jeme také na příslušných vstupech 105, 
106, 108. Dále zkontrolujeme, zda jsou 
tranzistory TI O až TI 7 cyklicky spínány, 
přičemž propojením bodů 4 a 5 se musí 
rozsvítit všechny segmenty. 

Další krok již vyžaduje spojení 
s mikropočítačem. Na obr 2 je uvede- 
na pouze jedna z možností výkonového 
zesílení signálů a napájení proudové 
smyčky. Je možné použít přímo výstup 
nékterého z výkonových hradel TTL 
nebo výstup obvodu 3212 (v tomto 
případe by bylo třeba nahradit diodu 
D2 z obr. 3 drátovou propojkou). 

Pro případ, že obvod napájející prou- 
dovou smyčku signál invertuje, jsou 
určeny přepínací body 1 — 3, 2 — 3. 
Propojku zvolíme tak, aby v době, kdy 
nepřichází žádná posloupnost, byla na 
vstupech 1, 2 obvodu 103 úroveň L. 

Nyní do akumulátoru vložíme určitou 
hodnotu a vyvoláme podprogram. Při 
správné činnosti se na výstupech Q1 až 
Q8 103 musí objevit obsah akumuláto- 
ru (01 až 04 obsahují negované úrov- 
ně) a na displeji se rozsvítí příslušná 
číslice. 

Princip kódování, který je zde použit, 
zaručuje velkou odolnost proti kolísání 
přenosové rychlosti (můžeme se o tom 
přesvědčit měněním parametru RATE 
v okolí zvolené hodnoty), přesto dopo- 
ručuji z hlediska dlouhodobé stability 
na místech R6, R9, Cl. C2 použít řadu 
TRI 91 a 7C215. 


Použití 

Displej najde uplatnění všude tam, 
kde je potřebné zobrazit výsledek něja- 
ké operace (např. měření elektrických 
veličin, zobrazení reálného času 
apod.), přičemž použití terminálu se 
jeví pro daný účel jako nevhodné. 

Displej je sice určen pro zobrazení 
desítkových čísel, ale není vyloučeno 
zobrazení čísel hexadecimálních. 
V tomto případě by bylo výhodnější 
místo obvodu Dl 46 použít obvod 
U40511 s příslušnými úpravami. Prove- 
dení s Dl 46 však poskytuje možnost 
programového zhasínání jednotlivých 
číslic (jedničkově bity DO až D3). 

' Použití zapojení z obr. 3 zajišťuje 
galvanické oddělení a umožňuje pře- 
nášet číselný údaj na poměrně velkou 
vzdálenost (stovky metrů). 

V případě, že zobrazovač bude umís- 
těn v blízkosti mikropočítače, je možné 
toto zapojení vypustit a signál přivést 
přímo na svorku C (obr. 4). 


Obr. 5. Obrazce plošných spojů desky 
W506 zobrazovače 


» 
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0000 

00100 

ORG 

0H 

0000 AF 

00120 STRRT 

XOR A 


0001 D300 

00130 

OUT 

<0>#A 

0003 31F8FF 

00140 

LD 

SP# 0FFF0H 

0006 DD210880 

00150 

LO 

IX. 8000H 

0000 110040 

00160 

LD 

DE# 4000H 

000D CD1R00 

00170 

CALL 

BVTES 

0010 3004 

00180 

JR 

NC# ERR 

0012 D001 

00190 

OUT 

<1># A 

0014 00 

00200 

MOP 


0015 00 

00210 

MOP 


0016 D302 

00220 ERR 

OUT 

<2># A 

0018 18E6 

00230 

JR 

START 

0010 14 

00240 BVTES 

INC 

0 

001B 08 

00258 

EX 

AF# A F' 

001C 15 

00260 

OEC 

0 

001D 3E0F 

00270 

LO 

A# 0FH 

001F D3FE 

00280 

OUT 

<0FEH># A 

0021 0E02 

00290 

LD 

C# 02H 

0023 CD9B00 

00300 LDSTRT 

CALL 

EDGE1 

0026 30FB 

00310 

JR 

NC. LDSTRT 

0028 211504 

00320 

LO 

HL/ 0415H 

0028 10FE 

00338 MBIT 

OJN2 

MAIT 

• 0020 26 

08340 

OEC 

HL 

002E 7C 

00350 

LO 

A#H 

002F 85 

00360 

OR 

L 

0038 20F9 

00370 

JR 

NZ/WAIT 

0032 CD9700 

00360 

CALL 

EDGE2 

0835 30EC 

00398 

JR 

NC# LDSTRT 

0037 069C 

00400 LE8DER 

LD 

B# 9CH 

0039 CD9780 

00410 

CALL 

EDGE2 

003C 30E5 

00420 

JR 

NC# LDSTRT 

003E 3EC6 

00430 

LO 

A# 0C6H 

0040 88 

00440 

CP 

8 

0041 30E0 

00450 

JR 

NC# LDSTRT 

0043 24 

00460 

INC 

H 

-0044 20F1 

00470 

JR 

NZ# LEADER 

0046 06C9 

00480 SVNC 

LD 

8# 0C9H 

0048 CD9B00 

00490 

CALL 

E0GE1 

0046 3006 

00500 

JR 

NC# LDSTRT 

004D 78 

80510 

LO 

A# 8 

004E FED4 

00520 

CP 

0O4H 

0050 30F4 

00530 

JR 

NC# SVNC 

0052 CD9880 

0O540 

CALL 

EDGE1 

0055 00 

00550 

RET 

NC 

0056 79 

08560 

LO 

ac 

0057 EE83 

00570 

XOR 

03H 

0059 4F 

00588 

LO 

C# A 

0058 2600 

00590 

LO 

H# 0 

005C 0660 

00680 

LO 

B# 0B0H 

005E 1819 

80610 

JR 

MARKÉR 

0060 08 

00628 LOGP 

EX 

AF# AF' 

0061 2005 

00638 

JR 

NZ# FLAG 

0063 DD7500 

80648 

LD 

<IX+0>#L 

0066 180B 

80650 

JR 

NEXT 

0068 CBll 

00660 FLAG 

RL 

C 

0068 2C 

08670 

INC 

L 

0068 2093 

QOfoa 

Wooo 

JR 

NZ# START 

0060 79 

0O690 

LD 

ac 

006E 1F 

00700 

RRA 


006F 4F 

08710 

LO 

C# A 


0070 13 

00720 

INC 

DE 

0071 1802 

00730 

JR 

DEC 

0073 0023 

80740 NEXT 

INC 

IX 

0075 1B 

00750 OEC 

DEC 

DE 

0076 08 

08760 

EX 

AF# AF' 

0077 0682 

08770 

LD 

B# 0B2H 

0079 2E01 

00780 MARKÉR 

LO 

L# 81H 

007B CD9700 

00790 BITS8 

CALL 

EDGE2 

007E D0 

00880 

RET 

NC 

007F 3EC8 

00810 

LD 

A# 0C8H 

0081 B8 

00820 

CP 

8 

0082 CB15 

00830 

RL 

L 

0884 0680 

00840 

LO 

B# 0B0H 

0086 O27B00 

00850 

JP 

NC# BITS8 

0089 7C 

00860 

LO 

8# H 

O08A 80 

00870 

XOR 

L 

0088 67 

08880 

LO 

H# A 

008C 7A 

00898 

LO 

ao 

0080 B3 

00900 

OR 

E 

008E 2000 

00910 

JR 

NZ# LOOP 

0090 7C 

00920 

LD 

R/H 

0091 FE01 

08930 

CP 

01H 

0093 028000 

00948 

JP 

NC# START 

0096 C9 

00950 

RET 


0097 CO9B00 

00960 EDGE2 

CALL 

EDGE1 

009A D0 

00970 

RET 

NC 

0098 3E16 

00988 EDGE1 

LD 

A# 16H 

0090 30 

00990 DELRV 

OEC 

A 

009E 20FO 

01000 

JR 

NZ# DELAV 

00A0 A? 

01010 

ANO 

A 

0081 04 

01020 SRMPLE 

INC 

B 

00R2 C8 

01030 

RET 

Z 

0083 3E7F 

01040 

LD 

A#7FH 

0085 DBFE 

01050 

IN 

A# <8FEH> 

0087 1F 

01060 

RRA 


0088 D0 

01070 

RET 

NC 

WTU nZr 

01000 

XOR 

C 

0088 E628 

01090 

ANO 

20H 

008C 28F3 

01100 

JR 

Z# SAMPLE 

008E 79 

01110 

LO 

ac 

008F 2F 

01120 

CPL 


0060 4F 

01130 

LD 

C# A 

0081 E607 

01140 

ANO 

07H 

0083 F608 

01150 

OR 

08H 

0085 03FE 

01160 

OUT 

<0FEH>, A 

0087 37 

01178 

SCF 


0088 C9 

01180 

RET 


0000 

01190 

END 

START 

00000 TOTRL ERRORS 



BITS8 007B 


MARKÉR 

0079 

BVTES 0018 


NEXT 

0873 

DEC 0875 


SAMPLE 

Wžu 

DEL8V 0890 


START 

0000 

EDGE1 0098 


SVNC 

0046 

E0QE2 8097 


W8IT 

0028 

ERR 0016 




FLAG 0068 




LDSTRT 0823 




LEADER 0037 




LOOP 0060 
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ing. Martin Štěpánek 

Jordana Jovkova 3256 
Praha 4-Modřany 

Program PROFESOR je určen pro zkoušení a opakování látky různých oborů 
zábavnou formou. Je zvláště vhodný pro problematiku, kde záleží na grafickém 
zobrazení (např. zeměpis, astronomie, geometrie, elektronika *mxL). Proprán je 
ovšem použitelný i pro zcela negrafické obory jako je třeba mluvnice nebo 
zkoušení násobilky. Program PROFESOR pracuje v několika režimech, v nichž 
můžeme látku opakovat (popř. vykládat), zkoušet a hodnotit. Zkoušení může 
probíhat buď individuálně, nebo soutěží více účastníků mezi sebou. 


Program PROFESOR sám o sobě za- 
jišťuje komunikaci mezi počítačem 
a člověkem. Aby PROFESOR ožil, musí 
obsahovat databázi údajů z oboru, 
který chceme zkoušet. Takových dato- 
vých bází může být velké množství 
a vždy, když nahrajeme novou data- 
bázi do programu PROFESOR, zí- 
skáme znalce příslušného oboru. 

Aby se snadno mohly vytvářet nové 
databáze podle zájmů jednotlivých uži- 
vatelů, přísluší k programu PROFESOR 
ještě pomůcka zvaná TESTEDITOR. 
TESTEDITOR je program, který velmi 
snadno umožňuje připravovat a opra- 
vovat báze grafických a textových infor- 
mací vlastních testů (viz str. 34). 

Program PROFESOR byl sestaven 
tak, aby byl snadno přenositelný na jiné 
typy počítačů. Pro používání programu 
PROFESOR na jiném počítači se upraví 
jen vlastní program a všechny databáze 
je možné používat beze změn. 

Obsluha programu PROFESOR 


Po nahrání programu do počítače se 
program sám spustí a my se dostane- 
me do jeho hlavního menu. V horní 
části hlavního menu vidíme tři možné 
režimy činnosti programu PROFESOR. 
Režim výkladu („v") slouží k postup- 
nému prohlížení obsahu celé databáze. 
Vykreslí se obrázek jedné otázky 
a vypíše se také správná odpověď. 
Například se zobrazí poloha města 
v obrysu Evropy (otázka) a jeho název 
(odpověď). U některých databází se 
také zobrazí nabízené varianty odpo- 
vědí, ze kterých bychom si v režimu 
zkoušení vybírali. Po prohlédnutí otáz- 
ky můžeme buď přejít k další otázce 
klávesou „ENTER“, nebo režim výkladu 
ukončit klávesou „SPACE“. 

Dalším režimem je zkoušení. V tomto 
režimu se nejprve nakreslí podkladový 
(statický) obrázek. Poté jsme dotázáni 
na počet účastníků, jejich jména, počet 
otázek v kole a stupeň obtížnosti. Volba 
stupně obtížnosti se projevuje v čase 
poskytnutém na zodpovězení otázky. 
Základní čas (obtížnost jedna) je ovšem 
různý pro každou databázi (podle její 
problematiky). Po volbě obtížnosti za- 
počne vlastní proces zkoušení. 
U jména účastníka, který má odpo- 



vídat, se rozsvítí blikající kurzor 
kterým můžeme cyklicky pohybovat 
pomocí klávesy „SPACE" (mezerníku). 
Když se domníváme, že je výběrový 
kurzor před správnou odpovědí, stisk- 
neme „ENTER". Zvukový signál nás 
upozorní na úspěšnost naší odpovědi. 
Tři stoupající tóny nám oznamují správ- 
nou odpověď, jeden dlouhý a hluboký 
tón odpověď špatnou. Při volbě správ- 
né odpovědi začne vedle našeho jména 
narůstat pás značek, který svou délkou 
vyjadřuje okamžitou úspěšnost. 
V každém případě se závěrem otázky 
zobrazí správná odpověď. Víme již. že 
čekání na odpověď je časově omezeno. 
Abychom mohli posoudit zbývající čas, 
zobrazuje se pod obrázkem souvislý 
pás, který se s ubývajícím časem 
zkracuje. V tomto páse je také informa- 
ce o pořadí otázky. Po vyčerpání všech 
otázek dochází k vyhodnocení, které je 
slovní a procentuální. Po stisku klávesy 
se vracíme do hlavního menu. Příka- 
zem nahrání nové databáze (,,n“) mů- 
žeme změnit obor znalostí našeho 
počítače. V režimu nahrávání uvedeme 
nejprve jméno databáze a poté určíme 
druh paměťového zařízení. Po ukonče- 
ní nahrávání se vrátíme do hlavního 
menu. 

Ve spodní části hlavního menu můžete 
vidět základní informace o databázi 
právě obsažené v programu PROFE- 
SOR. Je to jednak tabulka způsobu 
hodnocení v závislosti na úspěšnosti 
odpovědí a dále název datové báze, 
počet obrázků v ní (jednička představu- 
je trvalý podkladový obrázek) a za 
lomítkem si přečteme kolik buněk 
vymezeného prostoru zabírá (u první 
verze programu PROFESOR je to maxi- 
málně 4000 buněk). 

Princip činnosti programu 

Program PROFESOR pracuje s jed- 
ním statickým obrázkem a sadou 
obrázků dynamických, které se překre- 
slují přes statický podklad. Každý dy- 
namický obrázek v podstatě přísluší 
jedné otázce testu. Při výuce se otázky 
zobrazují ve stejném pořadí, jak jsou 
uloženy v databázi. Při zkoušení je 
pořadí náhodné. Každý obrázek je 
popsán jako série převážně grafických 
operací ve speciálním jazyce. Program 
PROFESOR pak vystupuje v roli inter- 
pretačního překladače. Zde je třeba 
zdůraznit, že pro užívání programu 
PROFESOR a TESTEDITOR není vůbec 
nutné znát zmiňovaný vnitřní jazyk. 
Program TESTEDITOR například píše 


program v tomto jazyce sám, podle 
toho jak kreslíme kurzorem po obra- 
zovce. 

Přenosnost programu 
PROFESOR na jiné počítače 


Program PROFESOR je navržen tak, 
aby jeho úpravy při přenosu byly 
minimální. Od cílového počítače ovšem 
vyžaduje splnění některých základních 
vlastností. Protože je PROFESOR prog- 
ramem grafickým, musí mít i cílový 
počítač bodovou grafiku. Protože se 
jedná o kombinaci obrázků s textem, 
musí být také zachovány následující 
proporce. Program bude pracovat na 
grafické ploše 256X192 bodů (může být 
i fiktivní). Pro texty bude tato plocha 
odpovídat 24 řádkům po 32 znacích. 
Tyto relace jsou splněny u celé řady 
počítačů přímo (kromě Spectra např. 
počítače značky Commodore, Atari, 
Amstrad-Schneider a typy kompatibilní 
s IBM PC nebo u nás známý Sord M5). 
U počítače PMD-85, který nesplňuje 
uvedený formát, lze s výhodou použít 
například příkaz SCALE (PROFESOR 
na PMD-85 již existuje). Cílový počítač 
také musí disponovat operační pamětí 
alespoň 16 kB. I když jsou všechny 
databáze barevné, není nutné je provo- 
zovat na barevném počítači. Všeobec- 
ně lze říci, že obslužné podprogramy 
funkcí, které nelze na cílovém počítači 
realizovat (např. barvy, zvuk apod.), 
musíme zachovat, pouze v nich neuve- 
deme výkonnou instrukci, kterou po- 
čítač neumí. Pokud je program PROFE- 
SOR správně převeden, budou data- 
báze fungovat beze všech změn. 

Nyní bych se ještě zmínil o některých 
příkazech jazyka BASIC počítače ZX- 
Spectrum, které by mohly činit potíže 
při přenosu programu. Příkaz RANDO- 
MIZE (ř. 1180) nastavuje semeno pseu- 
donáhodných čísel podle vnitřního 
čítače času (tedy náhodně).Funkce 
RND generuje pseudonáhodná čísla 
v intervalu od nuly do jedné. Příkaz 
DRAW je relativní. Grafické souřadnice 
se ve směru „x“ počítají od 0 do 255 
zleva doprava a ve směru „y“ od 0 do 
175 zdola nahoru. Řádky textu se značí 
0 až 21 shora dolů a sloupce 0 až 31 
zleva doprava. Pro tisk na řádek 22 (leží 
bezprostředně pod linií y=0) nebo 23 
užíváme příkaz PRINT # 0; AT 0, 
0 nebo PRINT # 0; AT 1,0. Příkaz 
INVERSE slouží jen pro grafické 
zvýraznění a lze ho vynechat. Příkaz 
OVER je využíván k mazání. Pro OVER 
0 se vynášejí body systémem „or“ pro 
OVER 1 systémem „xor“. Pro všechny 
základní báze dat může grafika praco- 
vat neustále systémem „xor“ nebo lze . 
nahrazovat příkaz OVER 1 režimem 
„reset“, kdy se pod vynesenou pozicí 
vždy nuluje. V databázích, u kterých by 
se s touto eventualitou nepočítalo, by 
docházelo jen k malým grafickým va- 
dám (např. v místě křížení by nebyl 
vynesen bod apod.). Základní databáze 
jsou ovšem navrženy tak, aby se pře- 
dešlo zmiňovaným a některým dalším 
problémům. Program také využívá je- 
den uživatelem definovaný znak (ř. 
1930 a ř. 2830), který může být samo- 
zřejmě nahrazen znakem běžným. 
Příkaz BORDER slouží k nastavení 
barvy okraje a lze ho vynechat. Klávesa 
„ENTER“ generuje kód 13, na který je 
testována. Generu je-li odesílací kláve- 
sa cílového počítače jiný kód, musí se 
testovací místa přizpůsobit 


Základní databáze programu „Profesor" 


V této kapitole uvádfm jako přiklad 
základní vlastnosti některých data- 
bází, které mám pro program PROFE- 
SOR sestavené. 


Dopravní situace 

Návěští „DopravSít", 27+ 1 obrázek, 
délka 3992 bunék. Databáze se zabývá 
řešením dopravních situaci na křižovat- 
kách. 
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Evropská moře 

Návéští ,,MoreEvr“, 16+1 obrázek, 
délka 2116 buněk. Zkoušený zde vybírá 
jeden z pěti názvů moří, o kterém se 
domnívá, že přísluší vyšrafované ob- 
__ lasti na mapé Evropy. 



Návéští „Násobilka", 31+1 obrázek, 
délka 2754 buněk. Program zkouší 
malou násobilku formou nabídky pří- 
kladu a pěti možných odpovědi. Oba 
činitelé jsou menší než deset. 



Evropská města 

Návěští „ Města Evr“, 35+1 obrázek, 
délka 2373 buněk. Vybíráme jednu 
z pěti nabízených odpovědí pro polohu 
města označenou křížkem a šípkou. 



Souhvězdí severní oblohy 

Návěští „Souhvězdí", 20+1 obrázek, 
délka 1928 buněk. Program vykresluje 
bodově nejznámější souhvězdí severní 
oblohy. U každého souhvězdí udává 
velikost desetistupňového úhlu. 
K výběru je nabízeno pět odpovědí. 


Světová moře a oceány 

Návěští „MoreSveta", 20+1 obrázek, 
délka 2030 buněk. Na stínítku se 
zobrazí obrysy světadílů a špikami jsou 
označována jednotlivá moře. Odpověcf 
vybíráme z pěti názvů. 
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Velká násobilka 

Návěští „VelNasl", 40+1 obrázek, 
délka 2977 buněk. Zkoušení násobilky, 
kde první činitel je menší a druhý větší 
než deset. Správnou odpověď vy- 
bíráme z pěti čísel. 


Velká násobilka II 

Návěští „VelNas2", 25+1 obrázek, 
délka 2402 buněk. Součin, na jehož 
výsledek se program dotazuje, je tvo- 
řen dvěma čísly z intervalu deset až 
patnáct. Výsledek vybíráme z pěti od- 
povědí. 


*** UELKfl NOSOBILKPt XX *** 


c Martin Stepanek 1906 


[Kolik je 

15 x 13| 



a> aos 
b) 196 
o iee 

dl 17S 
C) 185 

El 


mu 



lankt 

a 

Filip 

• 

O lan ka 

*♦ 

roaas 




Evropská pohoří 

Návěští „PohoriEvr", 24+1 obrázek, 
délka 2049 buněk. V mapě Evropy se 
vykreslí poloha pohoří a na zkoušeném 
je vybrat správný název z pěti nabíze- 
ných. 


Města v ČSSR 

Návěští „MestaCSSFT, 32+1 
obrázek, délka 1695 buněk. Do obrysu 
naší republiky se zakreslují polohy 
měst a k výběru je nabízeno šest 
možností. 




evpQp&KĎ 
íso® pohoří 
a.ltipjntk 


>rr . 9 tredohsr J 
Sierra norem 
Kas ti uit p 
P«nnir*y 


>Har t lne e 
zvanovec 
Hubatek 


Naše města 

Návěští „NaseMesta", 42+1 obrázek, 
délka 1301 buněk. K naznačené poloze 
města vybíráme jméno z nabízených 
sedmi možností. Výpis této databáze je 
na str. 33. 
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r t 


1 GO TO 1750: REM Studený stt 


8 GO TO 1030: REM Horky Stert 
ae rem Křes i«ih 

30 LET U=P (O) 

40 LET U0=U +£S6*C0DE b$(U)4C0D 
E b$ (g + 1) 41 
50 LET U=U+8 

50 IF u >U0 RNO O < > 1 TMĚN LET T 
1*1 

70 IF U >U0 THEN LET f *0 : RETUR 
N 

60 LET k=COOE bi(u> 

90 LET uaU4l 

100 XF k=2 THEN GO SUO 860: GO 
TO 60 

110 XF kal THEN GO SUB 380: GO 

to m 

180 XF kae THEN GO SUB 1080: GO 
TO 60 

130 XF ks3 THEN 00 SUB 360: GO 
TO 60 

140 XF k=4 THEN GO SUB 480: GO 
TO 60 

150 XF ka0 THEN GO SUB 660: GO 
TO 60 

160 XF kalO THEN CO SUB 680: GO 
TO 60 

170 XF ka6 THEN GO SUB 460: GO 

T 160®XF ka& THEN GO SUB 580: GO 
TO 60 

190 IF k*7 THEN CLS 

800 XF ka© THEN BEEP 0.1,30 

810 XF kalí THEN GO SUB 900 

880 XF k a 18 THEN GO SUB 940 

830 XF k * 13 THEN GO SUB 1040 

840 GO TO 60 

850 REM ORRU , 

860 ORRU COOE b* <U> -XS ,COOE bt( 
u + 1) -ys 

870 LET xSaCOOE bf(U) 

880 LET ysaCOOE b|(U4l) 

890 LET u«u 48 
300 RETURN 

380 PLOT P COOE bt(U) ,CO0E bi(u+l 

*330 LET XS-CODE bi(u> 

340 LET y*=COI>f£ bÍ(U4l) 

350 LET U*U+8 
360 RETURN 

380 PRIN? T RT COOE bitu) , COOE bi 

tU4l);__ _ 

390 LET U«U+8 
400 RETURN 

' 480 FOR T*5Tl TO u+COOE bitu) 

430 PRINT biti) i 
440 NE XT l 

450 LET u*U+COOE bitu)4l 

460 RETURN 

470 REM INK 

480 XNK COOE bitu) 

490 LET U«U+1 



Správný název: 


ooite odpověď : 


Endua i on 

Arch i aades 
»M Nectaris 

Plato 

(1 Cogn i tun 
n Nubtui 

[' v ’ / | * — | | 1 c M. Štěpánek '8© 

David ♦♦ 

Helena • 

>Jachya • 


m arau* 

580 PRPER COOE bitu) 

530 LET U *U + 1 
540 RETURN 

550 REM REL DRRU _ _ 

560 ORRU COOE b* tu) -18B#C00E bi 

(U+lí-186 

570 LET XSaxsi-COOE bitu) -188 

580 LET ysays+COOE bi(U4l)-188 

690 LET U au +8 

600 RETURN 

610 REM SEGMENT 

sao let uSso 

630 LET u3»U 

64* LET U4au0 

650 LET O aCOOE bi (U ) 480 

650 GO SUB 80 

670 LET O *U5 

680 LET u bu3 

690 LET U0au4 

700 LET U «U + 1 

710 RETURN 

780 REM ERRSE 

730 LET (0 = 1 

740 LET nOaO 

750 IF f«l OR ílaO THEN RETURN 
780 LET u5«0 
770 LET U3au 
780 LET U4au0 



790 LET OaoO 

800 LET fal 

810 OUER 1 

680 GO SL0 80 

630 OUER 0 

840 LET 0*u5 

850 LET U *U3 

6£* LET U0=U4 

870 LET (0=0 

880 RETURN 

890 REM BOROER 

900 BOROER COOE bt(U) 

910 LET usu 41 
980 RETURN 
930 REM BLXNK 
940 OUER 1 

950 XF ťOa0 THEN LET fOal: LET 
nOaCOOE bitu) 

960 XF nOa0 THEN LET fOaO: OUER 
0: LET Uau4l: RETURN 
970 LET n0anO-l 
980 LET u=p(o) 

990 GO SUB 80 

1000 LET U0ap (o) 4CQ0E bitpto)) 
1010 LET UaU4l 
1080 RETURN 

1030 REM Spravn* odpoved 
1040 LET psCOOE bi (U ) 

1050 LET U*U4l 
1080 RETURN ^ 

1070 REM NRZEU OYNRM OBR 
1080 LET n$a"" 

1090 FOR isl TO COOE bitu) 

1100 LET niani4bi tu4i ) 

1110 NEXT i 

1180 XF f 8 *0 THEN PRINT RT 


r 4 j-1 


.Síni 

1130 IF (3 = 1 THEN PRINT RT rl,*l 

;n$ 

1140 LET USU4C00E bi(u)4l 
1150 RETURN 
1160 REH NRBXDKR 
1170 GO SUB 80 
1180 RRNDOMIZE : REM Stbeno 
1190 INPUT "Počet ucestniku taex 
(M) ; “) a" ; h0 

1200 XF h0 >■ THEN GO TO 1190 
1210 FOR hal TO h0 
1280 xnput "Ubeno th> ; " . ucest 
ni ka="; k$^ 

1830 PRINT PAPER 8, INK 8; AT T04 
h-l,S04l; ki 
1240 NEXT h 

1250 XNPUT "Otázek v kote (6-12) 
*";pl 

1260 IF PÍ <5 OR P 1 > 12 THEN GO TO 
1250 

1270 INPUT "Obtížnost. 1-3 (l«Ml 
a) = ";e 

1280 IF *<1 OR e >3 THEN GO TO 18 
70 

1285 LET f2a0 

1286 LET ( 3a0 
1290 FOR bal TO Pl 
1300 FOR hal TO hO 

1310 IF 1>1 OR h>»8 THEN GO SUB 
8830 

1340 Z pRÍNT'RT r04h-l.S0; PAPER 8 

Í350 K lÍŤ 0*INT ( tpO-1.0001) *RND) 

1360 IF 9 = 1 THEN GO TO 1450 
1370 LET paXNT ( tn -0.0001) eRNO) 4 
1 
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1380 FOR jal TO n 

1390 IF jap THEN GO TO 2430 

1480 LET usINT ( (P0-1.0001) *RNO) 

42 

1410 IF U=0 THEN GO TO 1400 

1420 LET usp <u> 43 

1430 GO SUB 1080 

1440 NEXT j 

1450 LET (8*1 

1460 LET (3=0 

1470 GO SUB 20 

1480 LET (5*1 

1490 LET í 2 a0 

1500 LET klál 

1510 PRINT AT r,*-l;">" 

1580 LET 9 *INT (t#8/e) 

1530 FOR jal TO 16 

1540 PRINT #0iAT 1,32-j-j;" 

1550 FOR isl ŤO 9 
1560 LET kisINKEY* 

1570 IF k*sCHR$ 13 THEN LET i a38 
000: LET jal? 

1580 IF kis" " THEN GO SUB 8580 
1590 NEXT i 

1600 NEXT j 

1610 PRINT AT f 4kl-l,S-i; 

1620 IF klap AND i > s32000 THEN G 
O SUB 2770: GO TO 1640 
1630 BEEP 1,-6 

1635 GO SUB 2460 „ „ ^ 

1640 PRINT AT r04h-l ,S0; PAPER 6 
; INK 8; " " 

1650 NEXT h 
1660 NEXT b 
1670 GO SUB 2230 
1680 BEEP 0.1,30 

1690 PRINT #0jAT 1,0;" #** ZKOU 
SEN I UE UKONČENO *** " 

1700 GO SUB 2460 
1710 GO SUB 2460 
1720 BEEP 0.1,30 
1730 GO SUB 2660 
1740 RETURN 
1750 PAPER 1 
1760 INK 7 
1770 BORDER 1 
1780 CLS 
1790 OIM X ( 13) 

1800 OIM o (5) * 

1810 OIM p (100) 

1820 OIM b* (4000) 

1830 LET ( *0 
1840 LET fOaO 
1850 LET 0=1 
1860 LET f 2=0 
1870 LET ( 3=0 
1880 LET h=l 
1890 LET x S =0 
1900 LET US*0 
1910 LET 7 7 =0 
1920 GO SUB 3220 

1930 REM Def značku (neni nutné) 
1940 POKE USR “H“ 40 , BIN 00000000 
1950 POKE USR "H" 41, BIN 00011000 
1960 POKE USR "H" 42 , BIN 00111100 
1970 POKE USR "H" 43, BIN 01111110 
1980 POKE USR "H" 44 , BIN 01111110 
1990 POKE USR "H" 45 , BIN 00111100 
2000 POKE USR "H" 46 , BIN 00011000 
2010 POKE USR "H" 47, BIN 00000000 
2020 GO TO 2860 


1 . Novo t ny 

2. >Hjch 

3. St«p»nek 

4- . ko pecky 

♦ ♦ 

♦ 

♦ 

My jsae chtěli jit dnes do ki- 
na.. ale lístky byly vyprodány. 

(podstatné ja. 
pfi dávné jk . 

5 á j a e n o 
cis l o v k. a 
s L o v e i o 
příslovce 
předložka 
spojka 

ci tos lovce 

Části ce 

Op révné 

' Zpověď: 

SLOt/NÍ DRUHY 
Štěpánek ’eo 


l-prerusu je 


TMĚN GO TO 213 


THEN LET O=p0 


8030 REM Uyktbd 
2040 LET 0=1 
2050 GO SUB 80 
2060 PRINT 00; "BH 
tapin-pokracu je 
207®^ FOR 0=8 TO P0 
2080 LET j=l 
2090 LET (3 = 1 
2100 LET ('2 = 1 
2110 GO SUB 20 
2120 LET (3=0 
2130 IF INKEYÍ = “ 1 
0 

2140 BEEP 0.1,30 
2150 IF INKEYia" 

: GO TO 2200 
2160 LET ('2 = 1 
2170 LET ('7 = 1 
2180 GO SUB 2230 
2190 LET (2=0 
8800 NEXT o 
2210 RETURN 
8220 REM UybaZ 
2230 LET 00=0 
2240 LET (2=1 
2250 LET (3=1 
2260 LET U*P (O) 43 
8270 IF (7=1 THEN GO TO 8380 
2280 GO SUB 1080 
2290 GO SUB 8460 
2300 LET (3=0 

2310 IF 9=1 THEN GO TO 8380 
8380 FOR i=l TO n 








2330 

2340 

2350 

2360 

2370 

2380 

2320 

2400 

24X0 

2420 

2430 

2440 

2450 

2450 

2470 

0 

2480 

2490 

2500 

25X0 

2520 

2530 

2540 

2550 

2560 

2570 

2580 

2590 

2600 

26X0 

2620 

2630 

2640 

2650 

2660 

2670 

2680 


PRINT RT r*i-l,s; 
FOR j = l TO d 


řUR jJ 
PRINT 


NEXT j 
NEXT i 
LET j»l 
LET r 7 >0 
GO 5U6 26X0 
LET f£»0 
RETURN 

LET u«p (o) +3 
GO TO X430 
REli cekáni Ss 
FOR b*l TO 90 

IF INKEV* O"" THEN LET b>X0 

NEXT b 
RETURN 

REM Uuaaz bodový 
GO SUB 730 
PRXNT RT rl,sl; 

FOR i *1 TO d 
PRINT - 
NEXT i 
RETURN 

REM Uybarovy kurzor 
PRINT RT r +kl-l,*-l; " 

LET klakX+X 
IF kl>n THEN LET kl»l 
BEEP 0.05,18 
PRINT RT r +kl-l,s-l; " >'* 

LET i*i+5 
RETURN 

REM uyhodnocani 
FOR i»l TO h0 
UET j*0 ti í /pl*lO0 
IF TMĚN LET j0*"OOBRE 

2690 IF j >W + (100-Ui /2 THEN LET j 
ks" UVBORNE “ 

2700 IF j*100 TMĚN LET j*s"6KUEL 

l?X0 IF j<» TMĚN LET j*»"SPRTNE 

2720. PRINT RT r0+i -1,40+13; jt; IN 

2730 NEXT i 
|735 PRINT ttO ; RT 

2740 
0 

2750 RETURN 
2760 ŘEM správo* 

2770 BEEP 0.1,23 
2780 PRUSE 10 
2790 BEEP 0.1,27 
2800 PRUSE 10 
2810 BEEP 0.4,30 . 

2820 LET Olh)*Oth)+l 

2830 PRINT PRPER 8; INK 8;RT r0 + 

h-l,s0 + l2+o th) ; 

2840 RETURN 
2850 REM M*OU 
2860 LET 0*1 
2870 LET fl*0 
2880 FOR i *1 TO 6 
2890 LET O ti) >0 
"•900 NEXT i 
2910 PRPER 1 
2920 INK 7 

1 


2930 8DRDER 
2940 CLS 
2950 PRINT 
O R * * * 
2960 PRINT 


*** PROFES 


iBBSXssa 


2970 PRINT 
k 1986" 

2980 PRINT 
2990 PRINT 

> " 

3000 PRINT 

3010 PRINT “UOU* r*Z i» : 
3020 PRINT 
3030 PRINT 
3040 PRXNT 
3050 PRINT 

§060 PRINT 
3070 PRINT 

3080 PRINT. "MOdnoctni 
OU databazi : " 

3090 PRINT 
3100 PRXNT " 

3110 PRXNT " 

+ (100-M) /2) ; 

3120 PRINT " 

3130 PRINT 


c Martin 5t«p*n« 


tv*rz« 1.0 


- vyk tad" 

- zkouitoi" 

- nahraná databa 


pro nahran 


100 y ." 

" ; XNT t« 

" X" 
X" 

XNU 


*** V IPICN UU SUB 8840 
k*s"n" THEN GO SUB 3220 
k*»"Z" THEN GO SUB 1170 
TO 2860 


SKUELE > 

UVBORNE *> 

X" 

OOBRE > 

SPRTNE < 

3140 PRINT RT 21 ,0; "Bazt 
ERSE l;«8; " t”;p0-l; • , +l/";p tp0) ♦ 
266*C00E b* tp tp0) ) +CODE b$(ptp0) 
+ 1 ) + 2 ; ) 

3150 IF INKEY0*" " THEN GO TO 315 
0 

3160 LET k«*XNKEY0 
2Í-2S It TMĚN GO SUB 2040 

3190 IF 

3200 GO _ 

3210 REM Nahrani databaz* 

3220 CLS 

3230 INPUT "Naz*V d* tabazt-"; *0 
3240 INPUT “Kaz* t* /Mi crodrivc? ( 
k/k) ; k B 

3250 XP k0B"k“ THEN GO TO 3430 
3260 LORO «0+ M l” DRTR pt) 

3270 LORO *$+“&" ORTR bkt) 

3280 LORD « I* "3" ORTR Xt) 

3290 >LET P0«xll> 

3300 LET n»Xi2> 

3310 LET k *X 1 3) 

3320 LET r«xt4) 

3330 LET k bX 1 5) 

3340 LET r0BX t6> 

3350 LET S0*X 17) 

3360 LET t*X(8) 

3370 LET d»X t9) 

3380 LET wsx(10) 

3390 LET q>x til) 

3400 LET r l»x ( 12) 

3410 LET s Ibx 1 13) 

3420 RETURN 

3430 LORO *"*••; l;«*+"l" ORTR pt) 
3440 LORD *"*"; 1; *k+"2" ORTR b*f 


) 

3450 LORO ♦"k" ; 1; *k+'*3' 
3460 GO TO 3290 


ORTR X t ) 



12 60 0 


10 2 
15 18 


18 


15 


$74 

769 

672 

974 

1075 

1174 

1279 

0 

0 

0 

0 

0 

0 

9 

0 

0 


788 

891 

991 

1092 

1191 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


301 

908 

1007 

1108 

1207 

0 

0 

0 

0 

0 

0 

576 

0 

0 

0 


93 § 

823 

924 

1027 

1128 

1227 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


m 

836 

938 

1042 

1143 

1247 

0 
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0 

0 

0 

0 

0 

0 

0 


9§S 

853 

955 

1059 

1160 

1263 

0 

0 

0 

0 

0 

0 

0 

0 

0 
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6 

6 

5 

1 

7 

1 

0 

0 
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0 

175 

2 

255 

175 

2 

255 

0 

2 

1 

0 

1 

12fó 

151 

2 

121 

152 

2 

123 

150 
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124 

150 
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126 
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131 
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2 

142 
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2 

146 

161 

2 
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2 
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2 
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2 
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2 
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2 
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2 
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2 
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160 

2 
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158 

2 
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2 
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2 
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149 

a 
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151 

2 
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179 
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151 

2 

184 

152 

2 

184 

149 

2 

194 

147 

2 

198 

142 

2 

199 

139 

2 

201 

148 

2 

203 

142 

2 

207 

138 

2 

208 

135 

2 

213 

138 

2 

215 

140 

2 

221 

141 

1 

222 

142 

2 

231 

141 

2 

238 

137 

2 

234 

123 

2 

231 

122 

2 

227 

124 

2 

225 

123 

2 

219 

124 

2 

216 

119 

2 

212 

116 

2 

210 

116 

2 

208 

118 
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205 

114 
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199 
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2 
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2 
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CG 
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169 

2 

248 

169 

1 

6 

97 

2 

129 

97 

2 

129 

3b 

2 

6 

38 

2 

6 

96 

1 

134 

38 

2 

134 

65 

2 

249 

65 

2 

249 

38 

s 

135 

38 

3 

11 

1/ 

4 

7 

63 

112 

114 

9? 

8 

118 

110 

97 

3 

12 

21 

4 

111 
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112 
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58 

1 

6 

33 

2 
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33 

2 
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2 

6 

6 

2 

6 
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1 
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87 

1 » 
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1 
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79 

2 
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79 

1 

223 
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1 

5 

7 

3 

1 

4 

12 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

3 

2 

1 

4 

12 

32 

78 

65 

83 

69 

32 

77 

69 

83 

84 

65 

32 

3 

3 

1 

4 

12 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

1 

34 
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1 
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1 

36 
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1 

3/ 

161 

1 
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1 

67 
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1 

68 
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1 

69 
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1 

16 
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2 

96 
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96 
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2 

16 
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6 

5 

5 

1 

3 

18 

1 

4 

15 

49 

46 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

3 
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1 

4 

15 

60 

46 
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3? 
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3 

20 

1 

4 

15 

51 

46 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

32 

6 

6 

5 

1 

1 

6 
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2 
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i* 2 

\ 

6 

4 

142 

10 

2 

99 

§2 

ir 
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9? 
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107 

3 

7 

5 

4 

4 

49 

57 

56 

54 

1 

105 
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2 

6 
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1 

34 
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1 

35 
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1 
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1 

37 
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1 

50 

127 

2 

52 
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X 
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12? 
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68 
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8 

0 

15 
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128 
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9 
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9 
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9 

127 
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9 

128 
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0 

12 

8 

4 

6? 

104 

101 

98 

1 

124 

147 

10 

1 

6 

0 

14 

0 

6 

75 

46 

86 

97 

114 

121 

1 
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18 

1 

8 

0 

16 

0 

8 

67 

104 

111 

109 

117 

116 

111 

118 

1 

134 
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10 

1 

6 

0 

12 

0 

4 

7? 

111 

115 

116 

1 

137 

152 

10 

1 

8 

0 

17 

0 
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85 

46 

115 

1 
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142 
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32 

10 
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1 

6 
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0 

15 

8 

7 

76 
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98 
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99 

1 
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10 

1 

6 

0 

14 

0 

6 

77 
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1 
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10 

1 

5 

0 

14 

0 

6 

75 
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9? 
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1 
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10 

1 

6 

0 

13 

0 
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97 
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1 
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10 

1 

5 

0 

14 

0 

6 
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m 
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1 
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10 

1 

5 

8 

13 

8 

5 

80 
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1 
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10 

1 

6 

0 

15 

8 

7 

75 

108 

97 

116 

111 

113 

121 

i 

134 

132 

10 

1 

8 

0 

13 

0 

6 

80 

105 

115 

101 

10? 

1 

143 

131 

10 

1 

8 


0 

20 

0 

12 

67 

46 

66 

117 

100 

101 

106 

ni 

118 

105 

99 

101 

1 

14? 

124 

10 

1 

8 

0 

13 

0 

5 

84 

9? 

98 

111 

114 

1 

149 

134 

10 

1 

8 

0 

13 

0 

5 

75 

111 

108 

105 

110 

1 

1S4 

144 

10 

1 

fi 

0 

17 

0 

9 

80 

97 

114 

100 

117 

98 

105 

99 

101 

1 

161 

145 

10 

1 

6 

0 

17 

0 

9 

/ 2 

46 

75 

114 

97 

108 

111 

118 

101 

1 

160 

149 

10 

1 

3 

8 

15 

0 

7 

74 

105 

104 

108 
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Ing. Martin Štěpánek 


Jordana Jovkova 3256 
Praha 4-Modřany 

Program TESTEDITOR je pomůcka pro vytváření databází vlastních testů. 
Editor je graficky orientován, uživatet maluje a popisuje obrázek a databáze se 
paralelné vytváří sama. Pomocí vestavěného monitoru může zasvěcený uživatel 
pracovat i na úrovni přímých instrukcí databáze. Toto není nutné, ale za 
některých okolností to může být výhodné. Program TESTEDITOR je vytvořen pro 
počítač ZX-Spectrum a jeho přenos na jiný počítač se nepředpokládá, protože 
databáze v něm vytvořené jsou funkčně nezávislé na typu cílového počítače! 


Základní principy 
tvorby vlastního testu 


Každý test je tvořen jedním statickým 
obrázkem a sadou obrázků dynamic- 
kých, které se postupně kreslí přes 
obrázek statický. Dynamický obrázek 
přitom vždy odpovídá jedné otázce 
testu. Při přechodu od aktuální otázky 
na následující se poslední dynamický 
obrázek smaže (při zachování static- 
kého) a vykreslí se obrázek nové otázky 
přes statický podklad. 

Součástí každé otázky testu je vlastní 
otázka (slovní nebo grafická, jako např. 
zobrazení polohy města), několik na- 
bízených odpovědí pro výběr a správná 
odpověď. Vlastní otázka je vždy zachy- 
cena v dynamickém obrázku (tedy 
napsána nebo nakreslena). 

Způsob nabízení odpovědí je dvojí. 
Při pevných odpovědích jsou tyto od- 
povědi součástí příslušného obrázku 
a jsou do něj přímo vepsány. Každá 
otázka zde má vždy stejné nabízené 
odpovědi. Při náhodných odpovědích 
nejsou odpovědi součástí obrázku 
a teprve v režimu zkoušení se generují 
a doplňují do dynamického obrázku. 
V tomto případě má stejná otázka při 
několika výskytech jiné nabízené odpo- 
vědi (jsou generovány náhodně z mno- 
žiny všech možných odpovědí v bázi 
dat). Prostor nabízených odpovědí mu- 
sí být na stínítku přesně vymezen, 
protože před texty jednotlivých odpo- 
vědí se pohybuje výběrový kurzor 
a v případě režimu náhodných odpo- 
vědí se prostor také musí mazat. Oblast 
je určena levým horním rohem, počtem 
nabízených odpovědí a maximální dél- 
kou odpovědí ve znacích. 

Správná odpověď otázky testu zde 
figuruje jako název dynamického 
obrázku. Prostor pro vypsání správné 
odpovědi musí být opět přesně určen, 
a to levým rohem (odpověď je jen 
jedna a maximální délka je známa). 

Statický obrázek tvoří neměnný pod- 
klad všech otázek. Musí respektovat 
oblasti pro nabízené odpovědi a pro 
zobrazení správné odpovědi. Navíc 




musí mít vymezenou oblast pro zobra- 
zování průběžného hodnocení účastní- 
ků. V této oblasti se v režimu zkoušení 
vypisují jména zkoušených a jejich 
aktuální hodnocení. Oblast je stanove- 
na udáním levého horního rohu 
a počtem účastníků. Její délka je vždy 
26 znaků. Na první pozici se pohybuje 
kurzor výzvy, na druhé pozici začíná 
jméno a na třinácté pozici je začátek 
oblasti hodnocení. 

Statický obrázek i obrázky dynamic- 
ká mohou využívat grafiky, textů 
a barev. Barvy užité v dynamickém 
obrázku by měly respektovat barvy 
statického obrázku v místech, do nichž 
se dynamický obrázek zobrazí. Nabíze- 
né odpovědi a správná odpověď se 
vypisují v naposled určených barvách 
v rámci dynamického obrázku. Jména 


účastníků a jejich hodnocení naproti 
tomu zachovávají podkladovou barvu 
oblasti ve statickém obrázku. 

Další parametry databáze jsou: doba 
čekání na odpověď (musí zahrnovat 
nejen dovolený čas na přemýšlení, ale 
také dobu potřebnou k manipulaci 
s výběrovým kurzorem) a mez špat- 
ného hodnocení. Tato mez je úspěš- 
nost odpovědí účastníka, která již nevy- 
hovuje požadavkům (slovní hodnocení 
SPATNÉ). Mez se určuje v procentech. 
Nejvyšší hodnocení SKVELE je pak 
pouze pro 100% úspěšnost. Interval 
mezi SKVĚLE a ŠPATNĚ je rozdělen na 
dva stejné podintervaly, které jsou 
značeny VÝBORNĚ a DOBRÉ. 


Hlavni menu 
programu TESTEDITOR 


po nahrání a spuštění programu se 
dostáváme do hlavního menu. Jsou zde 
příkazy pro nahrání databáze do po- 
čítače (,,l*Moad), uchování databáze 
vytvořené editorem (,,s“-save) a ověře- 
ní nahrávky databáze (,,v“-verify). Jako 
vnější paměť pro uvedené tři příkazy 
slouží buď magnetofon nebo ZX Micro- 
drive. 

Další příkaz „n“ umožňuje vybudovat 
novou databázi. Při jeho užití jsme 
dotázáni na barvu okraje, papíru 
a inkoustu a poté vstoupíme do vlast- 
ního grafického editoru, který je po- 
psán v samostatné kapitole. 

Příkazem pro doplnění databáze 
„d“ (doplň) můžeme k bázi dat nahrané 
pomocí load „1“ přidávat další obrázky, 
a to buď na konec nahrané databáze, 
nebo z nahrané databáze zachovat jen 
statický obrázek (který je možno ještě 
doplnit) a přidávat nové dynamické 
obrázky za něj. Druhá varianta je 
výhodná pro využití stejných základů 
statických obrázků pro více databází 
(např. obrys Evropy pro databáze měst, 
moří a pohoří). Způsob doplnění dato- 
vé báze se určuje v menu, které se 
objeví po užití příkazu „d“ hlavního 
menu. 

Dále máme k dispozici příkaz 
k prohlížení hotových obrázků („p“ 
-prohlížení). Při jeho užití se nás pro- 
gram zeptá, jestli si přejeme zobrazit 
podkladový statický obrázek nebo jen 
zobrazovat obrázky dynamické. Poža- 
dované obrázky se zadávají pořadovým 
číslem, přičemž číslo jedna odpovídá 
statickému obrázku. Maximální dovole- 
né číslo obrázku je 80, protože čísla 81 
až 100 jsou rezervována pro segmenty 
(1 až 20). 

Příkazem volání monitoru „m“ (moni- 
tor) vyvoláme zvláštní program, který 
umožní pracovat s databází na úrovni 
jejich kódů. Monitor bude popsán také 
ve vlastní kapitole. 

Pod nabídkou příkazů hlavního me- 
nu se zobrazuji základní informace o 
současné databázi. Je to počet obráz- 
ků délka a volný prostor. Zápis 
„30+1/2800 zbývá 1200“ znamená, že 
databáze má 30 dynamických obrázků 
a jeden statický, zabírá 2800 jednotek 
paměťového prostoru a zbývá 1200 
jednotek volných pro další rozšiřování. 



Grafický editor 

Grafický editor umožňuje uživateli 
kreslit obrázek a automaticky vytvářet 
bázi dat. Do grafického editoru se 
dostáváme po užití příkazu „n“ a „d“ 
z hlavního menu. Seznam příkazů edi- 
toru a způsob jejich volání obdržíme po 
stisku klávesy „n“ (nápověda) v režimu 
editoru. Editor může pracovat v módu 
grafickém (jemná grafika 176 x 256 
bodů) nebo v módu textovém (22 řádků 
po 32 znacích). Při vstupu do editoru 
jsme v režimu grafickém a do texto- 
vého se můžeme dostat stiskem „t“ 
(text). V textovém módu můžeme užívat 
kurzory a zapisovat znaky. Zpět do 
grafického způsobu práce se dostane- 
me užitím klávesy ENTER. V grafickém 
režimu můžeme pohybovat grafickým 
kurzorem buď pomalu kurzorovými 
klávesami nebo rychle klávesami 5, 6, 
7, 8 (tj. kurzory bez šiftu). Polohu 
grafického kurzoru můžeme také zadat 
hodnotově příkazem „h“ (hodnoty), 
který se dotáže na souřadnice x a y. 

Bod vyneseme klávesou „0“ a kur- 
zor spojíme s naposled vyneseným 
bodem úsečkou stiskem klávesy 
„ENTER“. Máme zde dále možnost 
nastavování barev okraje „o", papíru 
„P“ a inkoustu „i“. Obrazovka se maže 
příkazem „v“ (výmaz), který zároveň 
nastaví naposled stanovené^ barvy pro 
celou plochu stínítka. Jinak se totiž 
naposledy stanovené barvy uplatňují 
jen v následujících vyneseních bodu 
a znaků. Další možností je zápis příkazu 
zvukového signálu „z“ (zvuk) a blikání 
doposud nakresleného obrázku „b“. 
Pro lepší posouzení polohy bodů vzhle- 
dem k textovým Čtverečkům slouží 
vynesení mřížky „m“. Pokud se do- 
pustíme při kreslení chyby, můžeme 
poslední příkaz (nebo sérii příkazů) 
vymazat klávesou „SPACE" (při ma- 
zání se vypíše název rušeného příkazu 
a jeho parametry). 

Editor umožňuje definovat až 20 tzv. 
segmentů obrazu (značení číslem 1 až 
20). Segmenty jsou vhodné pro opaku- 
jící se části dynamických obrázků. 
Pokud například jako segment nedefi- 
nujeme trojúhelník, můžeme v dyna- 
mických obrázcích testu dopravních 
značek volat tento segment pokaždé, 
když se má kreslit trojúhelníková 
značka. Nemusíme tedy trojúhelník 
stále znovu kreslit. Pro programátory je 
zřejmé chápání segmentu jako podpro- 
gramu. Segmenty mohou výrazně šetřit 



Grafické Sf héma programu 

paměť. Segment můžeme definovat 

tak, že na dotaz „Název obr. č “ 

odpovíme znakem Jsme dotázáni 
na číslo segmentu a poté převedeni do 
grafického editoru. Definici ukončíme 
stejně, jako by šlo o dynamický 
obrázek, tedy „k“. Segmenty můžeme 
definovat kdykoli v průběhu tvorby 
datové báze. V definici segmentů ne- 
smíme ovšem užívat volání jiného seg- 
mentu! Nadefinované segmenty se 
v grafickém editoru volají příkazem 
„s“ (segment) a pak číslem segmentu. 
Abychom segmentem mohli nadefino- 
vat obrazec, který bychom mohli při 
jeho volání umísťovat v různých polo- 
hách stínítka, disponuje editor příka- 
zem „r“ pro relativní spoj dvou bodů. 
Tak třeba v segmentu nadefinujeme 
čtverec užitím čtyř příkazů „r“ (bez 
vynesení bodu na začátku). Když po- 
tom v rámci některého obrázku vynese- 
me bod a zavoláme tento segment, 
vykreslí se nám čtverec v poloze urče- 
né vyneseným bodem. Je zde ovšem 
třeba jisté opatrnosti, abychom napří- 


klad nevynesli bod do rohu 
stínítka a nechtěli relativní 
obrazec vykreslit mimo hra- 
nice obrazovky. Pro tyto 
a některé další záludnosti 
příkazu „r“ doporučuji jeho 
užívání jen zkušeným uživa- 
telům programu TESTEDI- 
TOR. Příkaz relativního spo- 
je „r“ má oproti absolutnímu 
spoji „ENTER" ještě jisté 
omezení, protože nejdelší 
úsečka smí být dlouhá nej- 
výše 127 bodů (delší úsečky 
vytvoříme nastavením). Re- 
žim grafického editoru opus- 
tíme stiskem „k“. 

Vnitřní stavba databáze 

Pro běžný návrh databází 
testů vystačíme s dosud po- 
skytnutými informacemi. Pro 
některé rafinovanější vlast- 
nosti bází nebo složitější 
opravy a úpravy však může 
být vhodné vědět něco o její 
struktuře. Tyto znalosti jsou 
také nezbytné pro práci 
s monitorem. Databáze je 
tvořena přístupovým vek- 
torem p ( ), hlavním infor- 
mačním vektorem b $ () 
a třinácti pomocnými pro- 
měnnými. Obrázky jsou v da- 
tabázi rozloženy do sérií 
operací. Jsou tedy vlastně 
určeny jakýmsi programem 
ve zvláštním jazyce, jehož 
příkazy jsou uvedeny dále. 
Program PROFESOR (verze 
1.0)) a program TESTEDI- 
TOR (verze 1.0) rozumí 
příkazům z tab. 1. 

Operace s parametry jsou uloženy ve 
vektoru b$(). Začátky jednotlivých 
obrázků v b$() jsou označeny odkazy 
uloženými ve vektoru p(), jehož index 
představuje číslo obrázku (tj. když 
p (3)=2086, tak obr. 3 začíná v bS() 
od buňky s indexem 2086). Délka 
sekvence příslušející obrázku je dána 
obsahem buňky pod ukazatelem začát- 
ku a buňky v b$() naásledující (256 
* první buňka + druhá buňka). 

Použití MONITORU 

Monitor slouží pro přímé prohlížení 
a modifikaci báze dat. Odkazy přístu- 
pového vektoru vypíšeme příkazem 
„p“, číselný výpis databáze získáme 
příkazem „c“ (číselný) a slovní výpis 
operací s parametry příkazem „o“ 
(operace), číselný obsah můžeme 
změnit voláním příkazu změny „z“. 


Tab. 1. Příkazy 


Kód 

Parametry 

Význam 

0 

délka, název 

— načtení názvu dynamického obrázku 

1 

x, y 

— vynesení bodu v místě se souřadnicemi x, y 

2 

x, y 

— spojení naposled vyneseného bodu s x, y 

3 

řádek, sloupec 

— nastavení textového kurzoru 

4 

délka, znak . . . 

— vypsání řetězce znaků 

5 

barva 

— nastavení barvy inkoustu * 

6 

barva 

— nastavení barvy papíru * 

7 

8 

9 

dx, dy 

— výmaz stínítka a nastavení barev 

— krátký zvukový signál 

— spoj od naposled vyneseného bodu do x+dx, y+dy 

10 

číslo segmentu 

— vykreslení segmentu obrázku 

11 

barva 

— nastavení barvy vnějšího okraje * 

12 

počet 

— blikání dosud nakreslené části 

13 

číslo 

— načtení čísla pozice správné odpovědi 


V tomto režimu můžeme psát čísla, 
která přepíší původní obsah nebo 
stiskneme jen „ENTER" a obsah buňky 
zůstane beze změny. Ukončení režimu 
se děje zápisem znaku „k“ (konec). 
Abychom poznali, které části obrázku 
přísluší určitá operace nebo naopak, 
můžeme použít režimu trasování kres- 
by (příkaz „t"). V režimu trasování 
krokujeme kresbu klávesou „k" nebo 
klávesou „t“ můžeme provádět kroko- 
vání zároveň s výpisem právě pro- 
váděné operace. Trasování můžeme 
přerušit podržením klávesy „SPACE". 
Monitor opouštíme stiskem „k“ (konec) 
a tím se navrátíme do hlavního menu 
programu. 


* Kódy barev jsou následující: 0 — černá, 1 — tmavě modrá, 2 — červená, 

3 — fialová, 4 — zelená, 5 — světle modrá, 6 — žlutá, 7 — bílá (kódování podle 
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Výpis programu „Testeditor" 


1 QO TO 7000: REM Studen V >U 


3 90 TO 7001 : REM Horly Start 

10 PRIHT ttO; PRPER O; INK 7;RT 
O.Oi INVERSE li" VOLNÝCH: " ; 400 

O-bO, “REŽIM; 

11 PRINT aOiflT 1,36; '■ “i PAPE 
R i8i INK 7*íi6<4) ; "I f, i i ©; PAPER 

i9; INK 7*(»9<4); f, p ,, ;i9 

12 PRINT #0; AT 1,0;“ x*";x;" v 
u ,"xt*";xt; " yt*";yt;" 

13 LET K *1 

14. IF INKEYf*"" THEN LET a *35 

15 IF INKEYf < > " ” ANO * >0 THEN 
LET a*a-l: 90 TO 15 

16 IF INKEYS*"" THEN 90 TO 16 
16 LET K S <* INKEY S 

20 IF r f*"TEXTQVY " THEN 90 TO 
50 

22 IF IS*CHRS 8 THEN 90 SU8 10 
O; 90 TO 12 : REM viivo „ „ ^ . 

24 IF IfsCHR* 9 THEN 90 SUĎ 11 
0. GO TO 12: REM VpraVO „ 

26 IF k.$*CHRf 1® THEN GO SUB 1 

20: 90 TO 12 : REM dO tu _ . 

27 IF kS*CHR« II THEN 00 SUB i 

30 : GO TO 12: REM nahoru „ 

28 IF kf*"S" THEN LET K*16: 00 
SUB 100. LET fc*l: GO TO 12 

29 IF 1S*”8" THEN LET 1*16; GO 
SUB 110: LET 1*1: GO TO 12 

30 IF Hf*"6" THEN LET K *16: 60 
SUB 120: LET 1*1: GO TO 12 

31 IF 1S*"7“ THEN LET fc*16: GO 
SUB 130: LET 1*1: GO TO 12 

32 IF IS*CHRS 13 THEN GO SUB 8 

00 

33 IF l**"." THEN GO SUB 860 

34 IF tf *"r" THEN GO SUB 740 

35 IF k|*"S " THEN GO SUB 750 

36 IF 1S»"0" THEN 90 SUB 710 

37 IF fc$*"f THEN 90 SUB 730 

38 IF US*" " THEN GO SUB 900 

39 IF HS="h" THEN GO SUB 700 

40 IF fcS*"X" THEN GO SUB 580 

41 IF THEN GO SUB 960: 

RETURN 

42 IF fc$*"0" THEN CO SUB 600 

43 IF HS*"n" THEN GO SUB 6600 

44 IF tf*"i" THEN GO SUB 620 

45 IF kS="»" THEN GO SUB 6500 

46 IF Hf*"p " THEN GO SUB 640 

47 IF US*" v" THEN GO SUB 660 

48 IF l**"b" THEN GO SUB 670 

49 GO TO 10 

50 IF tf.CMR* 6 THEN LET P*l; 
GO SUB 200: GO TO 12: REM vlevo 

52 IF tf*CMR» 9 THEN LET p*l: 
90 5U8 220: GO TO 12: REM vpravo 
54 If lf*CHR« 10 THEN LeT pal: 
GO SUB 240: GO TO 12: REM dOlU 
56 IF * S *CHR S 11 THEN LET P-l: 
GO SUB 260: GO TO 12: REM nahor 

U 57 IF H»*CHR$ 13 THEN LET pal: 
LET rf*" GRAFICKY" : PRINT RT 9 1 , 

xt; OUER li PRPER 8; INK 8; " " : 
GO TO 10 

58 PRINT RT yl,xt;fc»i 
62 IF P*1 THEN GO SUB 80 
64 LET Xt«Xt+l 

66 IF Xt >31 THEN LET XtaO 

67 PRINT RT yt,xt; OUER li FLA 
SH 1; PRPER 8; INK 8; ” ” 

68 LET b*(b0>*k» 

69 LET b0*b0+l 

78 LET b*(PlJ«CHR$ (COOE b$(Pl 
> + 1> 

78 GO TO 12 

80 LET bf (b0> »CHR* 3 

81 LET b|(bO+l) *CHR| yt 
62 LET bf (bO+2) *CMRÍ Xt 

83 LET bf (b0+3) *CHRf 4 

84 LET p l*b0+4 

85 LET b»(pl)«CHR« O 

86 LET b0»b0+5 

88 LET P*0 

89 RETURN 


IF 10*0 THEN PLOT OUER li P 
8i INK 8iX,y 
LET X*X-K 

IF X <0 THEN LET X»0 
PUOT^OUER li PRPER 8; INK 6 
RETURN 

IF M 10*O*THEN PLOT OUER li P 
8; INK 8; x ,y 

IF T X>255 k THEN LET x*2S5 

PLOT* OUER 1; PAPER 8; INK 8 

RETURN 

IF M 10*O U THEN PLOT OUER li P 

8 i INK 8;x,y 

LÉT u*u~K 

IF y <0 THEN LET 

PLOT* OUER li PAPER 0; ™K 6 

: RETURN 


129 REM Nahoru 

130 IF 10*0 THEN PLOT OUER li P 
RPER 8i INK 6;x,y 

131 LET y*V + l 

132 IF y > 176 THEN LET y*l75 
134 LET 10*0 

136 PLOT OUER li PAPER 6; INK 8 
' lál RETURN 


199 REM Text vlevo 

200 PRINT RT yt,xti OUER 1; PRP 
ER 8; INK 8;" n 

201 LET Xt*Xt-l 

202 IF xt<0 THEN LET X t *0 

203 PRINT AT yt,xt, OUER li FLA 
SH l; PAPER 8 i INK 8; ” " 

204 RETURN 


REM Text vpravo 
PRINT AT y t , x t ; OUER li PAP 
; INK 3; " " 

LET xt=Xt+l 

IF X t >31 THEN LET Xt=31 
PRINT ATjyt.xt; OUER 1; FLA 
; PAPER 8; INK 8, " ” 

RETURN 

REM Text dO lu 

PRINT AT yt ,xt; OUER li PAP 
; INK 3, " " 

LET yt=yt+l 

IF y t >21 THEN LET yt*21 
PRINT AT yt,Xt; OUER li FLA 
; PAPER 8 i INK 6; " " 

RETURN 

REM Text nahoru 
PRINT AT y t , X t i OUER 1; PAP 
i INK 8, *• " 

LET yt*yt-l 
IF y t <0 THEN LET y l =0 
PRINT AT y l , x t i OUER li FLA 
; PAPER 8; INK 8; " " 

RETURN 


579 REM Zvuiovy signál 
530 LET bf(bO)*CHR$ 8 

582 LET bOabO+l 

583 BEEP 0.1,30 

584 RETURN 


REM Border 

INPUT "Barva olraje*"iJ 
BORDER j 

LET b*(b0>*CHRf 11 
LET bf <b0+l) *CMRf j 
LET b0*b0+2 
RETURN 
REM InlQUSt 

INPUT "Barva inioustu^"ij 
INK j 
LET i 8* j 

LET b*(bO)»CHR* 5 
LET bf(bOtl) *CHRS j 
LET bO*b0+2 
RETURN 
REM PaPir 

INPUT "Barva papiru«"iJ 
PRPER j 
LET i 9* j 

LET b*(bO>*CHR* 6 
LET bf ( bO+l) *CMR$ j 
LET bO=b0+2 
RETURN 


659 REH Uynaz 

660 CLS 

662 LET b$tbO>*CHR* 7 
664 LET bO-bO+l 
666 RETURN 

669 REM Bliiani 

670 INPUT "Koiiirat*"; j 
672 LET bf(bO)*CHRt 12 
674 LET bfCbO+l) *CHR* j 
676 LET bOsb0+2 

678 RETURN 


699 REM Hodnota 

700 OUeR 1: PLOT X,y 

701 INPUT "X*“ i X 


nvtissr*:*?®** * 

706 RETURN 


709 REM PlOt 

710 PLOT OUER 0; x ,y 

711 LET 10*1 

712 LET XS*X 
714 LET ys*y 

716 LET b$(b0i*CHR$ 1 
718 LET b* (b0+l> *CHRf x 
720 LET bf (bO+2) *CHRf y 
722 LET bOabO+3 
724 RETURN 


739 REM Rel draw 

B 5 (^ 

742 * PLOT xs,ys: DRAu x-xs,y-ys 

743 LET b*(b0)=CHR$ 9 

744 LET b* (b3 + l> =CHR$ (x-XS+126 

) 

745 LET bf (bO+2) *CHRf (y-ys+128 

746 GO TO 808 

749 REM Segaent 

750 LET U5*p0: LET U4*U : LET U3 
sb0 

752 INPUT Cis lo segaentu (1-20 

J 7SÍ°LET b*(bO)«CHR* 10: LET bf ( 
b0+l> =CHR$ O: LET 0*0+80 
754 90 SUB 3000 ^ 

756 LET p0*uS: LET U=U4: LET b0 
*U3 

758 LET bOabO+2 

759 RETURN 


799 REM Draw 

600 PLOT OUER 0; xs ,ys 

801 DRAU OUER 0;x-xs,y-ys 

802 LET bf(b0)=CHRf 2 
804 LET bf (b0+l> =CHRf x 
806 LET bf (b0+2> *CHRf y 
808 LET b0»bO+3 

810 LET XS»X 

812 LET ys*y 

813 LET K0=1 

814 RETURN 


849 REM PseudOPlOt 

850 PLOT OUER <8;x,y 
852 LET XS*X 

854 LET ysau 
856 LET K0*1 
858 RETURN 


899 REM Mazani 

i 

904 LET i 0*i 

905 LET j*CODE b*(») 


910 IF j*7 OR J *8 OR j*32 THEN 

^"916* IF + j*l OR j»2 OR J *3 OR j*9 

920 N IF E j*5 0R 3 j*6 OR j*10 OR 
11 OR j *12 OR j*13 TMĚN LET i .** + 

*921 IF j*0 OR j *4 THEN LET i *i + 

a 922 D lF b i<b0 1 THEN GO TO 904 
926 LET b0*i0: LET U*i0: GO SUB 

?mIn 3 §0 to 930 PRINT 
928 LET U=U + 1: LET k.*K-l: PRINT 
COOE b* (U ) i " ” i 

930 IF b0*p (P0-1) +2 

EN LET p0*p0-l: LET b0*P (P0-D +2 

931 input "Datsi aazani 7 ia/n> 

932*LET f7*0: IF Kf*"a" THEN LE 
Tf7»l: 50 SUB 935: GO TO 901 
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729 REM Texty 

730 LET f f *"TEXTOUY ^ m 

731 PRINT RT yt,xti OUER li FLA 
SH li PAPER 8 i INK 8; " 

732 RETURN 


i i et hk (D ( f 9) +1* » v 

^942 LET b*(plP|-ii+l)«CHRf ( INT 

9ÍŠ a iF* f ' 7*1 4 hEN RETURN 
944 LET 0*1 

94 ! LET S O*P0?1® IF f 9 > *80 THEN 

L Íl7°ÍF 9 OOl THEN 60 SUB 3000 

948 PLOT OUER li PRPER 6; INK 8 
;x,y: LET K0»0 

949 LÉT K f *" " 

950 RETURN 

960 IF 10*0 THEN PLOT OUER li P 
APER 8; INK 8; x , y 
962 RETURN 

1000 CLS 

1001 DIM x i 1 3 J 

1002 DIM P(100) 

1003 DIH bf (4000 ) 

1004 DIH a(704) 

1005 LET X *0 : LET XS*X 

1006 LET y=0: LET ys*y 

1007 LET X t *0 : LET y t *0 

1008 LET K0*0 

1009 LET r f = "GRAFICKY " 

1010 LET P0*2 

1011 LET b0=3 

1012 LET K *1 

1013 LET f 8*0 

1014 LET f*0 

1015 LET fl*0 

1016 LET f 9*0 

1017 LET P=1 
1016 LET f 0 *0 

1019 LET f 7=0 

1020 LET i 8 *7 

1021 LET i 9*1 

1022 RETURN 


102<t REM Nova databaze 

1025 LET p ilial 

1026 PRINT "Uytvoreni statického 
obrázku 

1030 input "Barva okraje*"; j 
1032 LET b*(b0)*CHR* 11 
1034 LET b* (b0+l) *CHR* J 
1036 INPUT Barva papíru*"; J 
1036 LET b* (b0+2) *CHR* 6 
1040 LET b$ tbů +3; *CHR# J 
1042 INPUT "Barva inkoustu*"; J 
1044 LET b$ (b0+4t *CHR$ 5 
1046 LET b$ <b0+5) »CHR* J 

1048 BEEP 0.1,30 

1049 BORDER CODE fo*(b0+l) 

1050 PRPER CODE b*íb0+3) 

1051 INK CODE b|(b0+5> 

1052 LET b* (b0+6) *CHR* 7 

1055 CLS 

1056 LET b0*b0+? 

1057 PLOT 0,0 

1058 60 SUB 10 
1060 BEEP 0.1,30 
1062 LET i*b0-3 

1064 LET b$ ( 1) xCHR* (INT (i/256) 

) 

1066 LET b»(2)sCHR* <i-256*INT ( 
i /256) ) 

1066 INPUT "Bevne nebo Bahodne o 
dpovedi?"; kf 
1070 LET q*0 

1072 IF k*«"P" TMĚN LET R«1 

1073 60 SUB 6500 

,1074 PRINT #0;RT 0,0; "Ltvy horní 
roh nabídky odpovědi:" 

1075 PRUSE 200 

1076 INPUT "radek*";r 
•sloupec*";* 

•Max.dtua odpovědi*" 


TMĚN LET U*U© 


1078 INPUT 
1060 INPUT 
id 

1082 INPUT 
oved i ; n 
1084 FOR 


"Počet nabízených odp 


_ TO r+n-1 

1086 PRINT RT i,*-l;i-r+l; 

1088 FOR j*l TO d 
1090 PRINT "O"; 

1092 NEXT J 
1094 NEXT i 

1096 PRINT #0;RT 0,0; "Levý roh * 
právně odpovědi : " 

1097 PRUSE 200 

1098 input "radel*"; ri 
1100 input "s loupec*"; sl 
1102 PRINT RT rl,sl; 

1104 FOR i Cl TO d 

1106 PRINT "S"; 

1110 PRINT 1 #©; RT 0,0; "Levý horní 
roh hodnoceni-." 

1111 PRUSE 200 

1112 INPUT "radel*”; r© 

11X4 input "s loupec*";*© 

1116 Input "Počet ucastmlu (»ax 
5) *"; j 


THEN 60 


1117 LET *«j „ . 

ttaí PRINT *RT r0+i -1,S0; " >UMENO. 

HODNOCENI...." 

1122 NEXT i 

1130 INPUT "Doba celani na odpov 

1 132 * print #0; RT 0,0; "Mez spatné 
ho hodnoceni v " 

1133 PRUSE 200 w _ (TM _ 

1134 input "Mez (náhodné , (INT 
( 100 /n) ) ; " •/.)*";*» 

PRINT #0; RTL 0, 


IÍ38 CLS : LET 0*1: GO SUB 3000: 
BEEP 0.1,30 


1149 REM Dynamické obrázky 
1160 LET p (P0) *b0 
1152 LET P0*p0+1 

1154 LET b0*b0+2 

1155 LET X *0 : LET U-0: LET X t *0 : 
LET yt*0. LET XS*0. LET ys=0 

1160 INPUT "Název obr . (P0-1) ; 
»" ; l $ : PRINT RT rl,sl;k§ 

1161 LET f9»0: IF k*« f, ( 

SUB 9500: 60 TO 1173 

1162 LET bf(b0)*CHR* 0 

1164 LET bí (b0+l) *CHR* LEN k« 

1165 LET b0«b0+l 

1166 FOR i*l TO LEN k$ 

1168 LET b*lb0+i ) *k*(i TO i) 

1170 NEXT i 

1172 LET b0*b0+LEN k* + l 

1173 PLOT 0,0 

1174 60 SUB 10 

1175 IF <1*0 OR f 9 > *80 THEN GO TO 
1180 

1176 INPUT “Cislo správné odpove 
di *" ; k 

1177 LET b*íb0)*CMR» 13 
1170 LET bí (b0+l) *CHR* k 

1179 LET bv*b0+2 

1180 IF f 9 > *80 THEN 60 SUB 9600: 
60 TO 1192 

1181 LET j*b0-p (p0-l) -2 

1182 LET b$(p (P0-1) ) *CHR« (INT ( 

J /2S6) ) j 

1184 LET b«(P (P0-1) +1) *CHR0 (INT 
(j -256* INT (J/256))) 

1192 input "Daisi dynamicky obr? 
(a/n) ";k» 

1194 IF k**"a" THEN 60 SUB 3800. 
60 TO 1150 

2000 INPUT "Nahrani databaze? (a 
/n) ";k$ 

2002 IF kf*"a" THEN 60 SUB 6000 
2004 RETURN 


3000 IF 0*0 THEN BEEP 1,20: RETU 
RN 

3001 LET u *p (O ) : IF u*0 THEN BEE 
P 1,20: RETURN 

3002 LET U 0 *U *256 4C0DE b$(u)+COD 
E bí (U + l) *1 

3004 LET U *U +2 

3005 PRINT #0; RT 1,0;" >>> Ktave 

BEEP 0. 


3006 IF INKEY0*" 

+ 1 

3007 IF f 6 = 1 THEN 60 SUB 8950 

3010 IF u > U 0 RND O ol THEN LET 
1 = 1 

3011 IF u>u0 THEN LET f =0 : LET 
3=0: RETURN 

3012 LET ksCODE b*(U) 

3013 LET U =U + 1 


TO 3006 


THEN 

60 

SUB 

3600: 

GO 

THEN 

60 

SUB 

3610: 

60 

THEN 

60 

SUB 

3750 : 

60 

THEN 

60 

SUB 

3620: 

60 

THEN 

GO 

SUB 

3630: 

60 

THEN 

60 

SUB 

3680: 

60 

THEN 

60 

SUB 

3640 

GO 

0 THEN GO SUB 

3690 

6 

THEN 

60 

SUB 

3650: 

60 

THEN 

60 

SUB 

3660: 

60 

THEN 

GO 

SUB 

3670: 

60 


TO 3006 
3018 IF » 
TO 3006 


TO 3006 
3022 IF i 
TO 3006 


TO 3006 
3024 IF » 
TO 3006 


O TO 3006 
3026 IF k > 
TO 3006 


TO 3006 


TO 3006 

3032 IF k*ll THEN 60 SUB 3710: U 
O TO 3006 

3034 IF k*12 THEN 60 SUB 3720: 6 
O TO 3006 

3035 IF k *32 THEN 60 TO 3006 

3036 IF k=13 THEN LET SO*CODE b* 
(O) : LET u*u+l: 60 TO *3006 

3037 CLS 

3036 PRINT "CHY6NY KOD: ",k ■ „ 

3040 PRINT "Obr. ";o;" v b$ od 

3042* PRINT "Pozice v bí ";u-l 
3044 STOP 


3599 

3600 
U + l) - 
3602 
3604 
3606 
3608 
3610 

) 

3612 
3614 
3616 
3618 
3620 
(U + l) 
3622 
3624 
3630 
3632 
3634 
3636 
3638 
364© 
3642 
3644 
3650 
3652 
3654 
3660 
3662 
3670 
3672 
3630 
(U+l) 

3682 

3634 

3686 

3688 


REM Kresleni 

DRRU CODE b$ (U ) -XS , CODE b* ( 

•ys 

LET XS=CODE bí (U) 

LET ysaCODE b* (U+l) 

LET usu +2 
RETURN 

PLOT CODE b$(u) , CODE b*(u+l 

LET XS*CODE b*(U) 

LET ys=CODE bí(U+l) 

LET u=u+2 
RETURN 

PRINT RT CODE b*(U),CODE bí 

LET u*U +2 
RETURN 

FOR l=u+l TO U+CODE bí(U) 
PRINT b* ( l) ; 

NEXT l 

LET u*U+CODE bí (U > +1 
RETURN 

INK CODE bí(U) 

LET u=u+l 
RETURN 

PRPER CODE bí(U) 

LET u=u+l 

RETURN 

CL5 

RETURN 
BEEP 0.1,30 
RETURN 

DRRU CODE bí (u) -128, CODE bí 
-128 

LET xs=xs+CODE bí (u ) -126 
LET y s =ys +CODE bí(u+li-128 
LET u=U+2 
RETURN 


iž.lSFfttórviSéš.r 


3639 REH Segment 

3690 LET u5=0 : LET U4»U0. LET u3 

3692 LET O =CODE b$(U)+80 
3694 60 SUB 3000 

3696 LET 0=U5: LET U0»U4: LET U* 
U3+ 1 

3696 RETURN 

3700 LET f 0*1 : LET n0*0: IF f *1 
OR i 1*0 THEN- RETURN 

3701 LET U5*0 : LET U3*U : LET U4* 

*J0 

3702 LET f*l 

3703 OUER 1 

3704 60 SUB 3000 

3705 OUER 0 

3706 LET O *U5 : LET U*U3: LET U©* 
U4 

3707 LET f©=0 

3708 RETURN 

3710 BORDeR CODE b*(U> 

3712 LET U*U+1 
3714 RETURN 
37330 OUER 1 

3722 IF '0*0 THEN LET f0*l: LET 
n0=CODE b* (u ) 

3724 IF n0=0 THEN LET f0*0: OUER 
0: LET 0 *u + 1 : RETURN 

3725 LET n0*n0-l 

3726 LET U*P(0) 

3727 GO SUB 3000 

3729 LET U0*p(o)+CODE b$(p(o)> 

3730 LET U«U+1 
3732 RETURN 
3750 LET n*»“" 

3752 FOR i=l TO CODE b*(U) 

3754 LET n $*n í + bí (u +i ) 

3756 NEXT i 

3758 PRINT RT rl,si;ni 
3760 LET u =U +CQDE b*(U)+l 
3762 RETURN 

3800 LET f 1*1 : LET f2*l: LET f3* 
0: LET j = l 

3801 IF f9>*80 THEN CLS : LET O* 
1: 60 SUB 3000: 60 TO 3804 

3802 LET O*P0-1: LET U*p(0)+3 

3803 60 SUB 3700 

3804 LET i 1*0 : LET f2*0 
3806 RETURN 


3999 REH Dekódováni 

4000 LET k *CODE bt(U) 

4002 IF 1*0 THEN LET kí*"Dyn.naz 
4V": LET ksCODE bí(U + l)+i: RETUR 
N 

4004 IF kal THEN LET k$«"BOd“: L 
ET 1*2: RETURN 

4006 if k=a then let k**"usecka” 

: LET k*2; RETURN 

4008 IF 1*3 THEN LET k#*"KurZOr" 
: LET k=2: RETURN 
4010 IF ).=4 THEN LET k$*"Text": 
LET k=CODE bí (U+l) +1 : RETURN 
4012 IF ks5 THEN LET kí*’InkOUSl 
": LET k«l: RETURN 
4014 IF k=6 THEN LET k í *"Pap i f “ : 
LET k * 1 : RETURN 

4016 IF k *7 THEN LET k**"UymaZ": 
LET 1 *0 : RETURN 

4018 IF 1*8 THeN LET kí«"ZVUk.Si 

gnal": LET k«0. RETURN 

4019 IF k *32 THEN LET k*«"N»C" : 
LET k *0 : RETURN 

4020 IF kalí THEN LET kí*"Okraj 
: LET kal: RETURN 

4022 IF k *12 THEN LET kí«"Bt*kan 

i": LET kal ; RETURN 

4024 IF k* 13 THEN LET kí* Spravn 

a odpoved": LET k*l: RETURN 

4026 IF k *9 THEN LET l»*"Ret.US« 

cka" : LET k *2 : RETURN 

4026 IF k*10 THEN LET kí* Segmeo 

t": LET 1*1: RETURN 

4028 LET k$*"Chyba !" 

4029 LET K *0 

4030 RETURN 


5999 
5000 
5002 
eni : ' 

6003 

6004 
6008 
6008 
6011 
6012 

6013 

6014 

6015 

6016 

6017 

6018 

6019 

6020 
6021 
6022 
6023 
6025 
6030 
6032 
6034 
) 

6036 

6037 
6036 
6050 
6052 

6054 

6055 

6056 


6099 

6100 
6102 
sni : ' 

6103 

6104 
6106 
6106 
8109 
6110 
6112 
6114 
) 

6116 

6118 

6120 

6122 

6124 

6150 

6151 
P (P0- 

6152 
6154 
6156 
6158 
6160 
6162 
6164 
6166 
6168 
6170 
6172 

6174 

6175 

6176 


REM utozeni databaze 
CLS 

PRINT "uotte pametove zariz 
PRINT _ 

PRINT " O-kazeiovy 
PRINT " H-mi crodr i ve " 

INPUT k»: CLS 
LET X (1) *P0-1 
LET X (2) *n 
LET X (3) *rn 
let x (4) *r 
LET X (5) *S 
LET X (6) *r0 
LET X (7) *S0 
LET X (8) *t 
LET X (9) *d 
LET X (10) *» 

LET X (11) *R 
LET x ( 18) *r 1 
LET x (13) *S1 

input "Název databaze*"; j* 
IF k**"k" THEN 60 TO 5050 
SRUE *"m"; 1; j* + "l" DRTR p() 
SRUE *"m" ; 1; j$+"2" DRTR b* ( 

SRUE *••*”; 1; j* + "3“ DRTR x(> 
LET k $*" " 

RETURN 

SRUE 4| + "1" DRTR PO 
SRUE j * + "2" DRTR b* O 
SRUE j*+"3" DRTR xí) 

LET k*=”" 

RETURN 


REH Nahrani databaze 
CLS 

PRINT "Uotte pametove zariz 
PRINT 

PRINT " B-kazetovy mgf" 
PRINT " S-»i crodr i ve" 

INPUT k*: CLS 

INPUT "Název databaze*"; J* 
IF k**"k" THEN GO TO 6120 
lord *"m"; l; j*+"i" DRTR po 
LORD *"m"; 1; J*+"2" DRTR b$( 

LORD *”m" ; 1; j» + "3" DRTR xO 

60 TO 6150 

LORD j* + "l" DRTR PO 

LORD j*+"2" DRTR b« O 

LORD j í + "3" DRTR XO 

LET P0*X (1) +1 

LET bC*P (P0-1) +256*C0DE b* ( 
1) ) +CODE b$ (P (P0-1) +1) +2 
LET n =x (2) 
let m*x (3) 

LET r sx (4) 

LET Ssx (5) 

LET r0*x 16) 

LET S0*X (7) 

LET t*X(8) 

LET d sx (9) 

LET W sx (10) 

LET (11) 

LET r l*x (12) 

LET Slax (13) 

LET k$*"" 

RETURN 


6199 

6200 
6202 
en i : - 

6203 

6204 
6206 
6208 
5210 
6212 

6213 

6214 
O 


REH overeni databaze 
CLS 

PRINT "Uotte pametove zariz 
PRINT 

PRINT " B-kazetovy mgf" 
PRINT " B-mi crodr i ve" 

INPUT k$: CLS 
input "Název databaze*"; 

IF l$*"k" THEN 60 TO ‘ 

LET k $*” " 

UERIFY *"■"; 1; j$+"l" DRTR p 
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6216 UERIFY *"m “ ; 1; j *4"2" DflTR b 

liis UERIFY *"»•'; 1; j $4"3" DflTR x 
( ) 

6219 RETURN 

6220 PRINT "Hledám. "; j*4"l" 

6222 UERIFY j$+"l"DATAp( 

6224 PRINT "Hledám: jít ,?" 

6226 UERIFY j$ + "2 "0ATA b$() 

6226 PRINT "Hledám: ";j*4"3" 

6230 UERIFY j* + "3"0ATA x() 

6231 LET fc$="" 

6232 RETURN 


6499 REM MrxZka 

6500 PRINT AT 0,0, 

6520 FOR i *0 TO 10 

6522 PRINT PAPER 5; INK 0; OUER 

l; " 

: rem Dvouřádková šachovnice 
s bright 

6530 NEXT i 

6531 BORDER 5 

6532 RETURN 


6599 REH Napovědí 

6600 PAPER 1: INK 7: BORDER 1: C 

LS 

6602 PRINT "Seznam příkazu edito 

ru : “ 

6604 PRINT 

6606 PRINT " HHB-cuch ly graf 
i cky kurzor " _____ 

6608 PRINT “ agi^HS-presny text 

ovy a gra- ficky kurzo 

6609 PRINT " fl-hodnotove zadaní 

t r. kurzoru" 

610 PRINT 1 8-vyneseni bodu pod 
kurzorem" _____ 

6612 PRINT " BBBBB-špoj kurzoru 
s posi. bodem" 

6614 PRINT " H-nastavenx barvy o 
kraje" _ 

6616 PRINT " B-nas taveni barvy p 
apí ru" 

6618 PRINT " B-n*skaveni barvy i 
nkoustu" _ . _ . 

6620 PRINT “ B-vymaz obr. a nast 

6622 ^^INT V " B-kextovy režim (zp 

662 ?^Bint " H-zvukovy signál" 
6626 PRINT " H-blikani dosud vyt 

6627 n pRINT b " B-votani segmentu o 

eeli^PRlNT " B-Pomocna mřížka íz 

6630®print ;; BBHBB- 2ruseni posie 

663l°PRINT C “ fl-napoveda i=tc*to me 

6632 PRINT " B~ (relativní spoj p 


|-zruseni poste 


6632 PRINT "B~ (relativní spoj p 

6633 e ?RINT y ",V‘ ps * 0d0b0d Pf ° 

6634 V PR INT ** " B-konec prače v edi 

iiié GO S SUB 935 
6640 RETURN 


6699 REM Doplněni 

6700 CCS 

6701 PRINT "ZPUSOb doplněni:". P 

RINT _ 

6702 PRINT " H-dynam obr na koně 

6703*print " B-*katicky obr se s 
mazanim všech dynamických 

6705 INPUT k$: CLS 

6706 LET 0=1. GO SUB 3000 

6707 IF k*="d" TMĚN GO TO 6710 
6709 LET P0=2: LET b0=P 12) : GO S 
UB 1057: GO TO 6713 

6712 GO SUB 1150 

6713 LET k* = "" 

6714 RETURN 


ERSE l; P 0 - 2 ; "+l/"; b0; " (zbyv 
4000-60;")" v 

7026 LET (8=0 

7031 INPUT "Uolte rez i » ";l 

7032 CLS : BEEP 0.1,30 

7034 IF k*="S" THEN GO SUB > 

7036 IF k$='l" ThEN GO SUB ( 

7038 IF k$="V" THEN GO SUB « 

7040 IF k*="tt" THEN GO SUB i 

7042 IF k*="P" THEN GO SUB < 

7044 IF k$="n" THEN GO SUB : 

GO SUB 1025 

7046 IF fc$="d" THEN GO SUB < 
7050 IF k*="k" THEN STOP 
7052 GO TO 7001 


3499 REM Monitor 

3500 BORDER 1: PAPER 1. INK 7. C 
LS 

8502 PRINT "Honí tor-vyberte rezi 


8503 PRINT 

8504 PRINT 1 
o vektoru p' 
3506 PRINT ' 
e b$" 

3508 PRINT ’ 

e b*“ 

8510 PRINT ' 


B-vypis pristupoveh 
B-ciseiny vypiš baz 
B-vypis operaci baz 
9-zmena obsahu b$" 
B-trasovaní kresby 


8511 PRINT B-lrasovani kresby 

3514 PRINT " B-konec prače s mon 
i torem" 

8515 INPUT k«: BEEP 0.1,30 

8516 IF k*="C" THEN GO SUB 9000 

3517 IF k*="0" THEN GO SUB 8700 

8518 IF k*="p" THEN GO SUB 8600 

3520 IF k*="Z" THEN GO SUB S750 

8521 IF k*="t" THEN GO SUB 8900 

3523 IF fc«="k" THEN LET k*="": R 
ETURN 

3524 PRINT » 0 ,AT l , 0; "St i s kne te 

klávesu! PAUSE 0 

8525 GO TO 8500 


8599 REM Přistup vektor 
3600 CLS 

8601 FOR i=l TO 100 

8602 PRINT i ,P i i I 
8604 NEXT i 

3606 RETURN 


3699 REM Uypis operaci 

8700 INPUT “Cisto Obr. tu segment 
u +60)=-; O: CLS . IF o<l OR o >10 
0 THEN BEEP 1,20: RETURN 

8701 IF p (o) =0 THEN BEEP 1,20: R 
ETURN 

3702 LET j =256*CQDE b»(p(O))+CO0 
E b* lp (O) +1) +2 

8703 PRINT "uypis operaci obr. 

; o ; " (deika = “; j; ") " 

37 04 PR INT #0; AT 1,0;">>> Kláves 
a SĚfŽ&ié přerušuje <<<" 

3705 FOR i=p(o)+2 TO p(o) 4 j-l 

3706 LET U=i 
3708 GO SUB 8726 
8710 LET i =U 

8720 IF INKEY**" " THEN LET i =32 
000 

8722 NEXT i 
3724 RETURN 


3725 REM Uypis operace 

8726 GO SUB 4000 _ ..... 

3727 IF f 8*0 THEN PRINT u;"->";k 

I^2é IF f 8=1 THEN PRINT 80; AT 1, 

8731 ÍF f Q=Í ÁN0'k>3 THEN PRINT 

80; CODE b*(U+l>;" GOTO 8 

8732 IF k=0 THEN GO TO 8738 
8734 IF T f8=0 + THEN PRINT CODE b* ( 

37^5 IF f 8=1 THEN PRINT 80; CODE 

b*iu);" 

3736 LET k=k-l 

3737 GO TO 8732 „ 

8738 IF f 8=0 THEN PRINT 

3739 IF f3=l THEN PRINT 80, 

3740 RETURN 


3749 REH Změna b$ 

3750 INPUT "úd bunky=";j 

3754 CLS _ _ 

8758 PRINT "SKB-beze změny ,B-k 

onec změn" 

3758 PRINT j CODE b * ( j ) , 

8759 IF j > 4000 OR j =0 THEN BEEP 
1,20: RETURN 

3760 INPUT j* 

8762 IF j*=k" THEN RETURN 

3764 IF j*="" THEN PRINT : LET j 

=j+l: GO TO 8758 

8766 LET i =UAL j* _ _ 

3768 IF i >255 THEN BEEP 1,20. GU 
TO 8760 

3770 LET b*lj)=CHR$ i 
8772 LET j=j4l 

3773 PRINT i 

3774 GO TO 6758 


8799 REM Prohlíženi 
3800 CLS 

8802 INPUT "Staticky obr. ia/nj 
880 ! LET f 6 =0 

8804 IF k*="n" THEN GO TO 8610 

3805 LET i 6 = 1 

3806 LET 0=1 
8308 GO SUB 3000 

3810 INPUT "Cisto obr. ( 0 -ukoncu 

3811 ÍF 0=0 THEN LET k*="": RETU 
RN 

3812 LET S O =0 : GO SUB 3000 

881 4 BEE P 0.1,30: PRINT t» 0 ,AT 1, 
0; "SSH 3 -P 0 kracu je , sprav. odp.= 

• co', ■ pruse o 

8815 IF f6=0 THEN CLS : GO TO 86 

3816 LET f 1=1 : LET (2*1: LET (3 = 
0: LET j = l : LET U=p(0)+3 

3817 GO SUB 3700 

8818 LET f 1 =0 : LET f2=@ 

3820 GO TO 3610 


8899 REM Trasovaní 

8900 CLS 

8902 INPUT "Cisto Obr IU í« 9 »ent 
U 480)="; O: IF O < 1 UR O > 100 THEN 
BEEP 1,20. RETURN , ^ 

6903 IF p (o ) =0 THEN BEEP 1,20: R 
ETURN 

8904 LET f 8=1 , 

8906 PRINT «0;AT 0,0, "B— gHiiil 


3910 LET (8=0 
3912 RETURN 

3950 IF INKEY*<>"k" AND INKEY<<> 
"t" AND INKEY $ < > " " THEN GO TO 8 
950 

8951 BEEP 0.01,40 

3952 IF INKEY* = "t" THEN LET Z =U : 

GO SUB 8726: LET U=Z 
3954 RETURN 


8999 REM Cis vypiš b« 

9000 CLS 

9002 PRINT "Uypis databaze b$(>: 

9004 INPUT "Od bunky=";j 
9006 FOR a=l TO 3 
9008 FOR i = 1 TO 21 

9009 > IF j4 la-li *2l4i -1 >4000 THEN 
LET i=2Ž: LET a =5 . GO Tú 9012 
9010 PRINT AT i , ta -1) *10, j4 la-i) 
*21 4 i -1; " - > ' , CODE b« i j 4 ia -1) *214 

i -1) 

9012 NEXT 1 
9014 NEXT a 
9016 RETURN 


9499 REM Tvorba segmentu 

9500 LET P0=P0-1 

9502 INPUT "Cis 10 segmentu* , 1 : 
PRINT AT r 1 , S 1 4 1 , 1 

9503 LET f 9 = 60 4 i 

9504 LET p(304i)=b0-2 
9510 RETURN 

9600 LET j=b0-P í (9) r 2 

9602 LET t>$ IP t f 9) J =l,HR* (INT ( j / 

256 * ) 

9604 LET pf CP l í'9) 4l) =CHR* i j -256 
*INT lj/256.') 

9606 RETURN 


3999 REH Hl. 

7000 BEEP 0. 

7001 BORDER 
LS 

7002 PRINT " 
TOR * * - 

7003 PRINT ; 

7004~PŘÍŇŤ ' 
k 1986” 

7005 PRINT 

7006 PRINT ' 

) " 

7007 PRINT 

7008 PRINT 

7009 PRINT • 

7010 PRINT • 
7012 PRINT • 
7014 PRINT ■ 
7016 PRINT 1 


menu 

1,30: GO SUB 1000 
1: PAPER 1: INK 7: C 

* * TESTEDI 




c Martin Stepane 


(verze 1.0 


-load databaze" 
-savé databaze" 
-ver i fy databaze " 
-nova databaze" 
-dopmeni databaze 


7018 PRINT " B-prohlizeni databa 
ze" _ 

7020 PRINT " fl-bonikor" 

7022 PRINT " B-konec programu" 
7024 PRINT AT 20,0, “Baze : "; INU 
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Grafický rozhodovací systém (GROS) je účinný prostředek pro počítačovou 
podporu rozhodování při výběru nejlepší varianty nebo pro stanovení pořadí 
výhodnosti variant. Variantou zde může být například způsob řešeni problému, 
druh nějakého zařízení apod. GROS je určen laickému uživateli, takže nevyžadu- 
je žádné znalosti z výpočetní techniky. Komunikace mezi programem GROS 
a uživatelem je jednoduchá a názorná, protože je vytvořena pomocí grafických 
prostředků. 


5píc>. run mmmb 
ipec.ain* 

>P i C * *.* fft 125^ 

5 1 ri c *. a i f vLmm 

P»P P '. € I I C _ 

HPPU Ilě 

Htan 130>.e» 

jfi 26ŮST^ -— « 
Htan S203T** 

AUri 80OXl_» 

CBM 16 a 

CBM 64 ■ ■ - ■ 

CBM 128 aai 

CBM Pu*J 4 a 

CPC 464. a 

CPC 664 aaai 

CPC 6126 - ■ - 

5HPPP HZTOía 
Sony Mi t.6» 


Původní verze programu GROS je 
napsána v jednoduché verzi jazyka 
BASIC a je počítáno s možností přeno- 
su programu mezi různými počítači. 
Nároky na cílový počítač jsou přitom 
minimální: asi 16 kB operační paměti 
a práce v reálném čase. Nejvhodnější 
třídou pro realizaci programu GROS 
jsou domácí a osobní mikropočítače. 
Předkládaná verze programu je určena 
pro počítače ZX-Spectrum. 


Způsob řešení problému 


Systém' umožňuje zadat názvy jed- 
notlivých variant, mezi kterými se bu- 
deme rozhodovat. Podobně můžeme 
zadat názvy všech faktorů, které mají 
vliv na výběr varianty. K jednotlivým 
faktorům stanovíme jejich váhy vý- 
znamnosti. Poté pro každou variantu 
uvedeme míru zastoupení (vlivu) jed- 
notlivých zvolených faktorů. Výsledné 
ohodnocení zkoumaných variant je 
dáno vlivem jednotlivých faktorů (podle 
vah významnosti) zastoupených ve va- 
riantách. Přesněji řečeno, ohodnocení 
je rovno sumě součinů zastoupení 
faktorů a jejich vah: 


ohodnocení = váha * zastoupení 

, faktor faktor 

faktor 


Příklad použití systému 


Pro snadnější pochopení problemati- 
ky nyní uvádím dva příklady různého 
použití programu GROS. 

Představme si, že jsme postaveni 
před problém výběru vhodného typu 
osobních počítačů pro svůj podnik. 
Několik typů máme předběžně vybráno 
(=varianty)^ ale potřebujeme se roz- 
hodnout jen pro jeden z nich. V první 
řadě si tedy zvolíme názvy, které budou 
jednotlivé typy reprezentovat (jsou-li 
původní názvy krátké, použijeme je, 
jinak užíváme části názvů nebo zkrat- 
ky). Dále se zamyslíme nad tím, které 
vlastnosti počítačů budou ovlivňovat 
naše rozhodnutí (=ovlivňující faktory). 
Tyto vlastnosti krátce a výstižně pojme- 
nujeme (např. spolehlivost, servis, ce- 
na, rychlost, dosažitelnost atd.). Nyní si 



stanovíme, jak mnoho nám na jednotli- 
vých faktorech záleží. Míru důležitosti 
každého faktoru (=váhu) si v programu 
GROS můžeme znázorriit graficky dél- 
kou pásu vedle jména faktoru. Cím je 
pás delší, tím je faktor důležitější (tj. má 
větší vliv na rozhodování). Míra důleži- 
tosti je též zobrazována v procentech. 
V poslední fázi se pro každý faktor (tj. 
vlastnost počítače) vypíší všechny va- 
rianty (tedy názvy typů počítačů) a my 
uvádíme zastoupení příslušného fakto- 
ru (vlastnosti) u každé varianty (typu 
počítače). Jsme-li například požádáni, 
abchom vyjádřili zastoupení vlastnosti 
„spolehlivost", zobrazíme vedle názvu 
každého typu počítače tím delší pruh, 
čím větší je jeho spolehlivost. Postupu- 
jeme tak, že u nejspolehlivějšího typu 
zobrazíme plnou délku pruhu a délky 
ostatních pruhů bereme relativně k ní. 
Má-li tedy například druhý typ počítače 
třikrát menší spolehlivost než nejlepší, 
bude mít třikrát kratší pruh. V této fázi, 
podobně jako při určování důležitosti 
faktorů, jistě oceníme grafickou formu 
zobrazení, kdy jsou na první pohled 
zřejmé relace mezi zadávanými daty. 
Po zadání zastoupení vlastností u všech 
typů počítačů můžeme spustit vyhod- 
nocení, jehož výsledkem je stanovení 
pořadí míry výhodnosti jednotlivých 
variant. 

V uvedeném příkladu si uživatel 
vytvářel celou databázi faktů sám. Je 
však možný i . opačný přístup, při kte- 
rém je databáze vytvořena odborníkem 
příslušného oboru a uživatel ji jenom 


využívá. Jako příklad tohoto přístupu 
slouží také demonstrační databáze to- 
hoto programu. Databáze obsahuje 
vlastnosti různých druhů domácích 
počítačů a slouží uživateli k výběru 
počítače na základě jím udaného za- 
stoupení v las t no s tí. Databáze byla vy- 
tvořena stejným způsobem jako data- 
báze předcházejícího příkladu. Názvy 
počítačů jsou chápány jako názvy va- 
riant, názvy vlastností jako názvy 
ovlivňujících faktorů. Zastoupení fakto- 
rů ve variantách (tj. vlastnosti u po- 
čítačů) je v bázi zadáno. Databáze má 
ovšem prázdné pole vyjadřující důleži- 
tost faktorů — váhy. Chybějící váhy 
doplní právě uživatel podle svých poža- 
davků. Jinými slovy, uživatel doplní jak 
moc mu na jednotlivých vlastnostech 
záleží. Po doplnění vah může žádat 
o vyhodnocení, jehož výsledkem je 
opět žebříček výhodnosti variant. Zde 
doporučuji důkladné prostudování 
obrazové přílohy. 

Na uvedených příkladech byly 
ukázány dva různé způsoby používání 
programu GROS. Cíl obou způsobů je 
totožný, totiž získání přehledu 
o vzájemné výhodnosti variant, ale 
zatímco první možnost předpokládá 
tvorbu celé databáze uživatelem, 
v druhém případě se již jedná jen 
o modifikaci připravené databáze. 














Obsluha programu Gros 


Po spuštění programu se zobrazí 
hlavní menu, které nabízí deset 
možností volby stiskem některé z uve- 
dených číselných kláves. Při stisku 
klávesy „ř* se například dostaneme do 
nápovědy, kde je zkráceně uvedeno 
zhruba totéž co v této kapitole. 


Na počátku práce s programem 
GROS máme v podstatě dvě možnosti: 
buď budeme vytvářet novou databázi 
variant nebo užijeme některou dříve 
vytvořenou databázi, kterou budeme 
modifikovat podle aktuálních potřeb. 
Nahrajeme ji z vnější paměti (např. 
magnetofon, disketová jednotka apod.) 


Při tvorbě nové databáze vstoupíme 
nejprve do režimu zadávání názvů 
a vah faktorů. Po stlačení klávesy „2“ 
se z hlavního menu dostaneme právě 
do tohoto režimu a uvidíme blikající 
kurzor. Kurzorem můžeme pohybovat 
pomocí kurzorových kláves všemi čtyř- 
mi směry. Stisk klávesy odpovídající 
písmenu, číslici nebo některé jiné 
značce (kromě dále zmíněných) vyvolá 
zápis odpovídajícího znaku do pozice 
kurzoru. Tímto způsobem můžeme za- 
psat názvy všech faktorů. Když chceme 
zadat k faktorům jejich váhy, stiskneme 
klávesu a dostaneme se do grafic- 
kého režimu. Míra váhy je dána délkou 
pásu, kterou lze měnit pomocí kurzoro- 
vých kláves pro pohyb vlevo a vpravo. 
Procento odpovídající délce je zobra- 
zováno též číselně ve spodní části 
obrazovky. Mezi jednotlivými faktory 
přecházíme užitím kurzorových kláves 
pro pohyb nahoru a dolů. Zápis vah 
ukončujeme stiskem klávesy odeslání 
(„ENTER nebo jí odpovídající klávesa 
podle typu počítače). Ocitáme se zpět 
v režimu zadávání názvů. Pokud ho 
chceme opustit a vrátit se do hlavního 
menu, stlačíme klávesu Obyčejně 
zde postupujeme tak, že nejprve zapí- 
šeme názvy všech faktorů (název 1, 
„ENTER", název 2, „ENTER", , . .), 
a pak jim přiřazujeme váhy. Pokud se 
dopustíme nějaké chyby, stačí kurzo- 
rem dojet do příslušené pozice a chybu 
přepsat (vynechání je přepsání meze- 
rou). 


Do režimu názvů variant vstoupíme 
z hlavního menu stiskem klávesy „3“. 
V tomto režimu se kurzor opět ovládá 
kurzorovými klávesami . Znakové kláve- 
sy zapisují odpovídající znaky. Kláve- 
sou „ENTER" můžeme přecházet na 
začátek následujícího řádku. Klávesou 
ukončujeme zadávání. Každý název 
varianty zapisujeme na samostatný 
řádek. 

Posledním zadávacím režimem je 
popis zastoupení faktorů v jednotlivých 
variantách. Z hlavního menu se do 
zmiňovaného režimu dostaneme kláve- 
sou „4“. V levé části obrazovky se nám 
vypíší názvy všech variant, v dolní zóně 
se objeví název faktoru a na nás je 
přiřadit zastoupení tohoto faktoru ke 
všem variantám. Použijeme kurzorové 
klávesy podobně jako při zadávání vah. 
Stiskem klávesy „ENTER" přejdeme 


k následujícímu faktoru. Zadávání 
ukončujeme klávesou Při vyznačo- 
vání zastoupení variantě, která má toto 
zastoupení největší, přiřadíme vždy 
plnou délku pásu (100%) a ostatní 
zastoupení posuzujeme relativně k ní 
(tj. kolikrát je menší)!!! 


Do kteréhokoli z uvedených režimů 
se můžeme později vrátit, abychom 
opravili chyby nebo provedli modifikaci 
údajů, které se například časem mo- 
hou měnit (zlevnění apod). Změny 
provádíme stejnými prostředky jako 
zadávání. Názvy prostě přepisujeme, 
hodnoty vyjádřené délkou pásů 
měníme pomocí kurzorových kláves. 
Údaje se přijmou vždy v té podobě, 
v jaké se nacházejí v okamžiku opuště- 
ní režimu. 


Pomocí kláves „5“ a „6“ se z hlav- 
ního menu dostáváme do režimů, které 
umožňují záznam nebo čtení databáze 
na vnějším paměťovém médiu. Po 


cena 

UZilkOVt p 
Systémové p 
Hry 

ROIUh RAM 
Gre i i ka 
Barevnost 
Ktavesni c« 
Interface 
Ay ch los t 


*•••»»*••**»*• t ***••******•«•»** 

OEHONSTRACNI OATABAZE POCITACU 

V tomto režimu uživatel zada ja 
i»u zaiezi na jednotlivých uvede- 
ných faktorech* zastoupeni fak- 
toru u počítačů je uděláno podle 
časopisu "Moj «*ikro", červenec 
1966 (Juyos lavie) 


Názvy faktorů 


nahrání databáze do počítače můžeme 
její data modifikovat výše uvedenými 
metodami. 


Režim „7“ umožňuje pořídit výpis 
databáze metodou kopírování stínítka, 
na které se postupně vypisují informa- 
ce z databáze. 


Klávesou „ 8 “ v hlavním menu vyvo- 
láváme proces vyhodnocení aktuální 
databáze. Po vyhodnocení jsme do- 
tázáni, zda si přejeme zobrazení vý- 
sledků číselně nebo graficky. Vyhodno- 
cení nám poskytne informaci o ohod- 
nocení jednotlivých variant a to tak, že 
nejvyšší ohodnocení je bráno jako 
100% a ostatní jsou k němu přepo- 
čítávána. Abychom neztratili informaci 
o absolutní výhodnosti, je pod menu 
výběru způsobu zobrazení výsledků 
informace o maximální možné hodnotě 
ohodnocení a o hodnocení nejlepší 
varianty. * 



Vybavení užitkovými programy 


Spe c Irům 



Spectrumt 



Speciruml2s 



Sinclair ql 


Sinclair 

Apple líc 



Appie Ile 



Alan 130XE 


Alari 13CXE. 

Alan 260ST 



Alari 520ST ♦ 



Alan Q60XL 


Alan 80OXL* 

CBM 16 


CBM 16 m 

CBM. 64 



CBM 126 



CBM Plus 4 


CBM Plus 4 m 

CPC 464 


CPC 464 « 

CPC 664 



CPC 6128 



SHARP MZ700 


SHARP MZ7O0» 

Sony HiiBil 


Sony Hi iBi l mm 


Názvy variant 


Vybavení systémovými programy 


Spectrum ■* 
Spéci rum* mm 
Spec uuiíISSm 
S inclair OUmm 
A pple 1 1 C mmm 
Apple Ile mam 
Alan ISCXEmm 
A lari 26dSTttam 
AI ar 5 SaeSTaM 


Atari 630XL 
CBM 16 
CBM 64. 

CBM 126 
CBM PIUS 4. 
CPC 4.64. 

CPC 664 
CPC 6126. 
SHARP MZ-700, 
Sony Hi tBi ti 



SPect rum m 
Sp e c t r u m ♦ ■ 

Spe c i rum 12S» 

Sinclair 0L» 
Appie líc ■ 
Apple Xle ■ 
Alari 130XEa 
Alari 260ST* 
Alari S20ST* 
Alari eeOXLa 
CBM 16 a 

CBM 64 a 

CBM 123 ■ 

CBM PIUS 4 a 
CPC 464 a 

CPC 664 ■ 

CPC 6128 ■ 

SHARP MZl7(3Ů« 
Sony Hil6il« 
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Dostupnost her 







Spec tru* a * 
Spectrun* a 
Spéct run 123aa 
5 i n c i. a i r ol m 
A pple líc M 
Apple Ile a 
Atari 130XE* 
Atari 2S0STaai 
Atari SSOST^a* 
Atari 600XLa 
CBM 16 . 

CBM 64. a 

CBM 128 a 

CBM Plus 4. a 
CPC 464. a 

CPC 664 a 

CPC 6123 mm 

SHARP MZ?O0a 
Sony HiiBita 


Spectrun , 
apecirua* , 
Spec trůn 1261 
Sinclair ou, 
Apple líc , 
Apple ne , 
Atari 130XE, 
Atari .260ST, 
Atari 520ST i 
Atari SOOXLt 
CBM 16 , 
CBM 64 , 
CBM 128 a 
CBM Pius 4 ■ 
CPC 464 . 
CPC 664 , 
CPC 6126 ■ 
SHARP MZ70Ca 
Sony Hi iBi ta 


* 


Spectrun a * 
Spectrun* B 
Spe c t ru»l23saa 
Sinclair OL«a 
Apple IIC mmm 
Apple Ile aa 
Atari 130XE«a« 
Atari 260ST^ 
Atari S2CSTaa 
Atari S00 XLmm 
CBM 16 mb 

CBM 64 ^ 

CBM 126 
CBM PIUS 4 asi 
CPC 464 
CPC 664 mh 

CPC 6123 a 

SHARP MZ"00a*i 
Soňu Hi tSi taa 


V^ikost operační paměti Kvalita klávesnice 


Interfejs v počítači 


Spe ctrun 
Spec trůne 
Spe c trůn 12Sa 
Sinclair ql 
A ppte líc 
Apple Ile 
Atari 130XE 
Atari 260ST 
Atari 520ST 
Atari 303XL 
CBM 16 
CBM 64 
CBM 128 
CBM Pius 4 
CPC 464 
CPC 664 
CPC 6128 
SHARP MZ700 
Sony Hi t.Bi ta 


Spectrun a* 
Spectrun* a 
Spéct run 123a 
Sinclair OLa 
Apple ZIC mm 
Appte xie aa 
Atari 130XEaaa 
Atari 260STaM 
Atari 5205Taa 
Atari 80OXL«aa 
CBM 16 mm 

CBM 64 aaa 

CBM 128 mmt 

CBM PIUS 4 m 
CPC 464 aa 

CPC 664 mm 

CPC ;6128 aa 

SHABřP MZ70O 
Sony Hi tBi ta 


Spectrun m 
Sp e c t r u n + B 
Spe c trůn 128a 
Sinclair QLa 
Apple líc a 
Appte Ile a 
Atari i30XEa 
Atari 260ST* 
Atan 520ST. 
Atari B00XLa 
CBM 16 a 

CBM 64 a 

CBM 126 a 

CBM PIUS 4 a 
CPC 464 a 

CPC 664 a 

CPC 6123 a 

SHARP MZ700, 
Sony HitBita 


Jemnost grafiky 


Užití barev a možnost výběru Rychlost procesoru 



1 OO T0 9000 REM Styděnu sta 
r t 

2 00 to 9090 fi£H Hor fy start 

1CO0 REM rULL 50 R EDITOR 
1001 LET lili 
ie0 2 _ET r =0 
1003 LET £-0 , 


1014 

IF k 


Ar-ÍD 

(2=1 THEN CO SUB 

6000 




1015 

IF k 

= 3 

AND 

(3=1 THEN CO SUB 

•3100 




1017 

co s 

u 6 

7050 


10 i 8 

IF t 


THEN 

PRINT 80, AT 0,0 

l U ':‘ 

BASE 

l; 

' NAZ 

VY FAKTORU 

10 1 9 

IF k 

= ■3 

THEN 

PRINT 80, AT 0,0 

; xnv 

ERoc. 


NhZ : 

VY VARIANT 

1020 

IF k 

=2 

AND ; 

x =2 THEN PRINT 8 

0, AT 

0 , 0 , 

íi 

(VERSI 

E 1 , "VÁHY FAKTOR 

Li ; 




", AT 0 , d 1 , " 

y a h a = 

", INT i 

. 0.1 + 

li -9 1 ) / 90 * 100 ) , " 

1021 

XF fc 

= 4 

THEN 

PRINT 80, AT 0,0 

, INU 

£ H 5 E 

1 , 

"FAKTOR. 


;AT 0, g i; "zas toupe 
ni*"; INT i í s - 9 1 , 90*100) ; "li" 

10-25 Gu SUB 5000 

1030 IF c=figh t THEN 00 SUB 7000 


: CO 

SUB 

6550. 

CO SUB 


7050 

GO T 

0 1499 






104 0 

IF 

c ^ «. i r 

THEN C 

o 

3U6 

6500 


1 J b 

7050 

CO TO i 

4 

=#9 


1050 

XF 

C =d09t 

i HEN 0 

0 

SUB 

7000: 

•J 'J 


6000 - 

CO SUB 

7 

050 . 

Gu T 0 

1495 







1050 

Ir 

C=up 

hEN CO 

3 

JB 7 

000 : G 


O SUB 6050 GG SUB 7050; CO TO 1 
4.y* 

1076 if x = i and c < ;end and c * fen 
te r AMD cwgraph then CO SUB 610 
O ; b U tO 14 2 9 

1060 IF xsl AND k=2 AND c*9fafh 
ThEN LET x =2 . CO SUB 7000. lET s 
= v i r ♦ i i +91 CO sUB 7000. CO SUB 
7050 

1090 if = i and c=end then co su 

B 1500 RET URN 

1100 IF X*2 AND C =ert te r HMD k i >4 
THEN CO SUB 6200; LET x=l. PPIN 
T 80; AT Q,0, INVERSE 1, "NAZUV FA 
r T *j R U ij Q ^ U 

B 7000. LET i*a: co SUB 7000: CO 

sub 7O50 

1110 IF xsi AND csenter AND k =4 

THEN CO SUB 6200- CO SUB 3500 

1115 IF x*2 AND c=erid THEN CO SU 

B 6200 LET rsr0+l 

1120 IF f rO THEN CO SUB 1500. R 

ETuRN 

1130 IF .: = i AND C-eriter ThEN CO 
SUB . 000. CO Sub 6 000 LET s sfl . 
CO SUB 7000 CO SUB 7050 
1499 CO TO 1020 


150B rem Na vrat 

1505 LET f=l 

1510, IF k =2 THEN LET (2; 

*520 IF i =3 THEn LET (3; 

1530 RETOAN 


1 

1 


2000 REM EDITOR ZASTOUPENI FAKTQ 
RU 

2005 LET t =0 
2010 LET >-.=2 
2025 Gu SUB 6500 
2030 CG SUB 1014 
2040 RBTURN 
5000 REM KLÁVESA 

5020 IF INKEY $s" " T HEN GO TO =.0£ 
0 

5030 LET C-CODE INKEY* 

504 0 BEEP 0,02 ,'20 
5050 RETURN 


6500 rem Sloupec vlevo 

6504 GO SUB 7000 

6505 IF s ==0-1 AND X =£ THEN PRIN 

T AT r , 5 .: " •: LET k* = " LET f $ 

((■+1,5+11 =" " 

6510 LET S=S-1 

6520 IF ž <0 THEN LET s =0 

6530 IF x =2 THEN PRINT AT r , s ; " 


5S35 IF X =2 AND ti < >4 THEN LET i * 
( r +1 , s +1) =" " 

6540 RETURN 


Hen 5 toupe c vpravo 
?Ji S ;L. IF X=2 AND SOS0-1 THEN PRI 

N ) ni I j S j 

6556 IF x =2 AND k<>4 AND SOS0-1 
THEN LET i * ( r +1 , s + 1 ) *"«" 

6560 LET s=s+l 

II 18 ferltá*- 1 THEN LET 


6000 REM Radě f, dolu 

5005 IF /. =2 THEN CO SUB 6200 

5010 let r=r+i 

6020 IF r ;-i* 0 -l THEN LET r=i* 0 -l 
5030 IF x =2 AND ti 04 THEN LET s = 
v i r +1) +9 1 

60 35 IF X =2 AND ti =4 THEN LET J = z 
i r + 1 , r ) +9i 
6040 RETURN 


6050 REM Pasek nahoru 

6055 IF x =£ THEN GO SUB 6200 

6060 LET rsr-1 

6070 IF r<0 THEN LET i* =0 

6075 IF x =2 AND k < >4 THEN LET s = 

v l r +1) +d 1 

6076 IF x =2 AND k =4 THEN LET S =Z 
ir +1 , ( i +91 

6080 RETURN 


6100 rem Zapiš znaku 

6110 IF k =2 THEN LET r * i r +1 , s + 1 j 

6120 IF k =3 THEN LET n*(r+l,s+l) 
= LHR* c 

6125 PRINT AT r,s;CHR* c 
6130 CO SUB 6550 
5135 GO SUB 7050 
6140 RETURN 


7000 rem vynaz kurzor 
7010 PRINT AT r ,s ; k* 

7020 RETURN 

>050 -REM zobraz kurzor 
7055 PRINT AT r , S ; "•*" 

7060 IF k =2 THEN LET k*=í*<r+l,S 
+1) : RETURN 

7062 IF k =3 THEN LET k*=n*ir+l,S 
+1) ; RETURN 

7065 LET k*=" ": RETURN 


7100 REM VYHODNOCENI 

7105 CLS 

7106 PRINT Flash 1 ; " Vy hodno cen i 
- prosit* cekejte ! ! ! " 

7110 FOR i=l TO i*0 
7120 LET h i i ) =0 
7130 FOR j=l TO r© 

7140 LET h(i)*h(i)+V(.i)*Z(i,ji 
715© NEXT j 

7160 PRINT AT 3 , 0; " Va r i an ta ";i 
" vyhodnocena" 

7165 BEEP 0.1,10 

7170 NEXT i 

7175 LET j=0 

7180 FOR i=l TO r0 

7185 IF h i i ) > J THEN LET j sh ( i ) 

7190 NEXT i 

7200 CLS 

7205 LET q=j/90 

7206 CLS 


6200 REM Odečteni váhy 

6210 IF k =2 TMĚN LET V i r ♦ 1) =s -g 1 

6215 IF k =4 THEN LET Z‘.r+l,i)«S- 

91 

6220 return mikroelektronika ’88 
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720? print 'Způsob reprezentace 
výsledku" 

7208 PRINT " 0-Navrat do ht.menu 

7209 print " i-gra f i cky" 

72Í0 PRINT " 2-ciseine" 

7211 GO SUB 5000 

7212 IF C=CODE "0" THEN LET c =CÚ 
DE "1": RETURN 

7213 IF CaOODE "2" THEN GO SUB 7 
300 : GO TO 7206 

7214 IF c=CODE "1" THEN GO SUB 7 
215; GO TO 7206 


7215 REh Grafické vyhodnoceni 

7216 CLS 

7217 GO SUB 8100 
7220 FOR i =1 TO r0 
7230 FOR j eg 1 TO S0 

7240 IF ( j-gl> *q>h (i ) OR h ( i ) *0 
THEN LET j=S0+l: GO TO 7250 
7245 PRINT RT i~l,j;'W 
7250 NEXT j 
7260 NEXT i 

7265 PRINT 80; RT 1,0; INUERSE 1, 
" UYHODNOCENI UYHODNOSTI URRIRNT 


7266 PRINT 80, RT 0,0; INUERSE 1; 
“ GROS »£) Martin STEPRNEK 1986 


7270 BEEP 0.3,10 
7275 GO SUB 5000 
7260 RETURN 


7300 REM Cisetne vyhodnoceni 
7310 CLS 


7320 GO SUB 8100 

7330 FOR i *1 TO r0 

7340 IF h(i)<>0 THEN PRINT RT i- 

1,91 + 1, INT (h (i ) /q/g 0 * 100 ) ; ” 5 i" 

7350 NEXT i . 

7365 PRINT 80, RT 1,0; INUERSE 1, 
" UYHODNOCENI UYHÚDNOSTI URRIRNT 


7366 PRINT 80, RT 0,0, INUERSE 1; 
•GROS © Martin STEPRNEK 1986 

7367 GO SUB 5000 
7370 RETURN 


8000 REM UYPIS NRZUU FAKTORU R 
RH 

8010 FOR i =1 TO r0 
8020 REM FOR jel TO S0 
8025 REM PRINt f*(i,j); 

8030 PRINT ri(i); 

3040 REM NEXT j 
8050 PRINT 
3060 NEXT i 
8065 BEEP 0.3,10 
—8070 RETURN 


8100 REM UYPSANI NRZUU URRIRNT 
8110 FOR i =1 TO r0 
8120 REM FOR jel TO S0 
8125 REM PRINT n*(i,j); 

8130 PRINT n « ti); 

3140 REM NEXT j 
3150 PRINT 
8160 NEXT i 

3165 IF k < >4 AND k<>7 AND k<>8 T 
HEN BEEP 0.3,10 
8170 RETURN 


3500 REM Přechod na datsi faktor 

8510 LET fsf+1 

8520 IF f > r 0 THEN RETURN 

3530 CLS 

3540 GO SUB 8100 

8550 LET S*Z (1, f ) +91 

8560 LET r*0 

3530 GO SUB 7050 

8586 REM FOR i *1 TO S0 

3586 REM PRINT 81;AT 0,i-l;f*(f, 

8590 PRINT 80; RT 1,0; INK 7; PRP 

ER 3, f Jí n 

8595 REM NEXT i 

3600 FOR i sl TO r0 

8651 FOR q*gl TO S0 

3652 IF q-gl>»z(i,f) TMĚN LET qs 

S0+1: GO TO 8654 

8653 PRINT AT i-l,q; W 

3654 NEXT q 

8656 NEXT i 

865? BEEP 0.3,10 

3660 RETURN 


9000 REM INICIALIZACE 

9002 REM Ui cep i smenove proměnně 
nahradte cisty dte užitého pocit 
ace 

9003 LET grapheCODE "=": LET ent 
er =13: LET endeCODE 

9004 LET up=ll; LET dovn=10; LET 
le f t =8 : LET r i gh t =9 


9006 LET í 2=0 

9007 LET f3=0 

9008 LET f=0 

9009 LET k* = " •' 

9010 REM Max rad ku editoru 

9020 LET r 0=22 

9021 REM Levý okraj grafiky 

9022 LET 9 1 = 1 1 

9030 REM Max stoupcu editoru 


9040 LET S0=32 
9045 LET g0=s0-g 1-1 
9050 OIM ř*(r0,s0) 

9060 DIM V i r 0 ) 

9070 DIM n*(r0,s0) 

9080 DIM z Ir0,r0) 

9085 DIM h i rO) 

9090 REM TĚLO PROGRAMU 

9091 BORDER 0; INK 7. PRPER 

9092 ‘BEEP 


1: C 





jiaspc-R- 


9096 PRINT 
K 1986" 

9097 PRINT 

9098 PRINT 

> “ 

9099 PRINT 

9100 PRINT 
MENU *t 

9105 PRINT 

9106 PRINT 
rogramu" 
9110 PRINT 
ktoru a vah 
9120 PRINT 
riant" 

9130 PRINT 
ktoru ve 
9140 PRINT 
9150 PRINT 
9160 PRINT 
9170 PRINT 
aze 11 

9180 PRINT 
abaze” 

9190 PRINT 


Martin STEPANE 


(verze 1.1 


" 1 

;; a 

•• 3 

4 

•■ 5 
" 6 

•• 7 
'• 8 


H L A U N I 

-Návod používaní p 

-Zadaní /editace fa 

-Zadaní /edi táce va 

-Zadaní /edi táce fa 
variantách" 
-Utozeni databaze ' 
-Načtení databaze 11 
-Tisk databaze 11 
-Uyhodnoceni datab 

i-Zatozeni nove dat 

»-Ukonceni programu 


9195 PRINT 

9196 PRINT PAPER 2; 11 
variant a faktoru!) 


(Max 11 ; r0; 11 


919? REM Rámeček dte ser počítač 
e 

9198 PLOT 6,105. DRRU 242,0; DRA 
U 0,-92: DRRU -242,0; DRAU 0,92 
9200 GO SUB 5000 
9210 CLS 

9212 LET k sC -CODE '‘0 11 

9216 IF CeCODE “l 11 TMĚN GO SUB 9 

900 

9220 IF C =CODE "2 11 THEN Gp SUB 1 
000 


9230-XF 

C=CQOE 

"3" THEN 

GO 

SUB 

1 

9240 

000 

IF 

C =CODE 

"4" THEN 

GO 

SUB 

2 

9250 

300 

IF 

C =COOE 

"5" THEN 

GO 

SUB 

9 

9260 

850 

IF 

C =CuDE 

"6" THEN 

GO 

SUB 

9 

9270 

700 

IF 

C=OODE 

"7" THEN 

GO 

SUB 

9 

9230 

100 

9290 

IF 

C =CODE 

"8“ THEN 

GO 

SUB 

7 

IF 

C =C ODE 

"9" THEN 

GO 

TO 

1 

9300 

9310 

IF 

GO 

C =CODE 
TO 9090 

"0" THEN 

STOP 



9t>0O REM uyber pametoveho zarize 
rn 

9610 CLS 

9620 PRINT "Použité pametove zar 
i zen i : 11 

9630 PRINT 11 i -Kaze lovy magneto f 
on" 

9640 PRINT 11 2-ZX Microdrive” 
9650 GO SUB 5000 
9660 RETURN 


9700 REM TISK 
9710 GO SUB 8000 

9720 COPY 

9721 BEEP 0.1,30. 
T : L PRINT 

9722 IF INKEY*=" 11 

9725 CLS 

9730 GO SUB 810© 

9740 COPY 

9741 BEEP 0.1,30: 
T : LPRINT 

9742 IF INKEY*="" 
2 

9750 LET f =0 
9755 IF f*(f+l,l> 
=i+l. GO TO 9780 
9760 GO SUB 3500 
9770 COPY 


LPRINT : LPRIN 
THEN GO TO 972 

LPRINT : LPRIN 
THEN GO TO p?4 

= '• " THEN LET f 

LPR INT : LPRIN 


9771 BEEP 0.1,30; 

T . LPRINT 

9772 IF INKEYSs 11 ” THEN GO TO 977 
2 

9780 IF r<r0-l THEN GO TO 9755 
9790 RETURN 


9800 REM SAUE 

9810 CLS 

9811 print 'Název databaze?'' 

9812 INPUT i * 

9813 IF LEN i* >7 THEN PRINT "Dov 
oteno max 7 znaku!"; GO TO 9820 

9815 GO SUB 9800 

9816 IF c =CODE " 1 " THEN GO SUB í 
320 

9817 IF c =CODE "2" THEN GO SUB í 
834 

9818 RETURN 


9826 SAUE i$+"2" DATA ví) 

9827 SAUE i*+"3" DATA n*í) 

9828 SAUE i*+"4" DATA Zi) 

9829 RETURN 

9834 REH Savé na microdrive 

9835 SAUE l; i *+"l" DATA f$( 

9836 SAUE 1; i*+"2" DATA V O 

983? SAUE 1; i * + "3" DATA n*( 

9333 SAUE * " » " , 1; i *+ "4" DATA z O 
984© RETURN 


5UJU řtun LUML' 


9851 CLS 
3352 PRINT "Název databaze?" 

9853 IF LEN x*>7 THEN PRINT "Dov 
oteno max 7 znaku!": GO To 9870 

9854 GO SUB 9600 

lil® IF c “ C0DE "1" THEN GO SUB 9 

*556 CeCODE "2' 1 THEN GO SUB 9 

370 

9858 RETURN 


9860 REM Load Z mgf 

9864 LOAD i*+"l" DATA f*() 

9865 LOAD i *+"2" DATA ví) 

9866 LOAD i*+"3" DATA n*() 
U£0 i**"*" «>ATA *<> 

9868 RETURN 


i R !í2,N Lo S d . z crodri ve 

9874 LOAD *"» ; 1; i * + " 1" DATA f*( 

9875 LOAD 1; it + ' , 2' 1 DATA vd 

9876 LOAD * "m 11 ; l| i DATA ^ \ 


9877 LOAD *"m"; 1; i *+"4' 
9890 RETURN 


DATA Z O 


9900 REM HELP PRO ZX SPECTRUH 

9901 LET t$=" STISKNETE LIBOUOLNO 
U KLAUESU ! ! ! " 

9902 CLS 

9904 PRINT " GROS SlOUZi PTO TOZ 
hodovaní me-zi více možnými vari 
aritami rese-ni nebo pro stanoven 
x poradí a miry výhodnosti jedn 
ottivych va-riant." 

9905 PRINT 

9906 PRINT 11 GROS umožňuje pro k 
azdy o v t i — vnujici faktor zvoti 
t vyznamovouvahu a pro každou va 
riantu urei tzastoupeni jednottiv 
ych fak toru .Uys ledne ohodnoceni 
kazde uvede-ne varianty je dáno 
součtem sou-cinu jednotlivých va 
h s pristus-nym zastoupením fakt 
oru." 

9907 PRINT 

9908 PRINT •• ohodnoceni eSUMfitva 
haazastoup.) “ 

9909 PRINT 

9910 PRINT " Popis ovládáni v ne 
kterých re- zimech je na datsich 

stránkách. U ostatních pripadec 
h se řídíme podle nabídkových wc 
nu . " 

9911 PRINT 80; INUERSE l;t* 

9912 GO SUB 5000 

9913 CLS 

9914 PHINT "ZADANÍ NAZUU FAKTORU 
A UhH ; " 

9915 PPINT 

9916 PRINT " a) Kurzo r : 5 ,6 , 7 , 8 ne 
bo kurzorové klávesy" 

9918 PRINT " b) Přechod na datsi 
radek: ENTER nebo kurzorem" 
9920 PRINT " OReZim vah;=" 

9922 print " d)Zpet režim nazvu: 
ENTER" 

9924 print " e ) Úkon cen i . . " 

9925 PRINT 

9926 print "Pozn. Názvy faktoru 
rouši byt od prvního sloupce, jin 
ak se nevy- tisknou! Max délka n 
azvu je zde" 

9927 PRINT gi;" znaku." 

9926 PRINT 80, INUERSE Ijt* 

9930 GO SUB 5000 

9932 CLS 

9934 PRINT "ZADANÍ NAZUU UAH ; 11 
9936 PRINT 

9936 PRINT " a ) Ku f ZO r . 5 , 6 , 7 , 8 ne 
bo kurzorové klávesy" 

9937 pRinT b) Pře Chod na datsi / 
radě k . ENTER" 

9936 PRINT " c ) Ukončen i " 

993.9 PRINT 

9940 print Pozn. Max délka nazvu 
" , gl, " zn . " 

9942 PRINT 80; INUERSE l;t* 

9944 GO SUB 5000 
9946 CLS 

9948 PRINT "ZADANÍ FAKTORU UE UA 
RIANT ACH: " 

9949 PRINT 

9950 PRINT " a) Kurzo r : 5 ,6 , 7 ,8 ne 
bo kurzorové klávesy" 

9952 PRINT " b)Prechod k dat. fa 
ktoru : ENTER” 

9954 PRINT " C ) Úkon cen i : . •' 

9956 PRINT 80; INUERSE lit* 

9958 GO SUB 5000 
9960 CLS 
9962 PRINT 

9964 PRINT FLASH 1; "UUEDENY NAUO 
D PLATÍ BEZ UY JÍMEK JEN PRO POCI 
TAC ZX SPECTRUH ! ! ! " 

9966 PRINT 

9968 PRINT "Tento návod je pouze 
or ientacni .proto je vhodné si p 
re c ii t pri - ručku uživatele." 
9970 PRINT 80, INUERSE lit*' 

9972 GO SUB 5000 
9974 RETURN 


9820 REM Savé na mgf 

mikroelektronika ’88 9825 saue i* + "i" data f*o 
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Jan Jelínek 

Kaplická 852 
14000 Praha 4 


Výukový program MĚSTA slouží 
k procvičování (případně testování) 
znalosti polohy měst nad 10 000 obyva- 
tel yčSSR. 

Je rozdělen do dvou částí: 

1 . Vstupní test: hráč má za úkol určit 
název počítačem označeného města 
na slepé mapě ČSSR. V této části se 
vyskytují pouze města nad 50 000 
obyvatel a není bodována. Určí-li 
hráč správně alespoň tri města 
z pěti, postupuje do druhé, hlavní 
části. 

2. Hlavní část: v této části jsou postup- 
ně probírány jednotlivé kraje. Úko- 
lem hráče je určit zaměřovačem 
polohu města, jehož název zadá 
počítač (10 000 až 50 000 obyvatel). 
V každém kraji jsou města zadávána 
tak dlouho, dokud součet odchylek 
určených poloh od skutečnosti ne- 
přesáhne 100 km (maximálně však 
5krát). O kolik se může hráč ještě 
zmýlit je zobrazeno jako dovolená 
chyba a pokud není překročena, 
připočítá se za každé město 100 
bodů. Nevyužije-li hráč během 
5 pokusů dovolené chyby, je mu za 

_ každý zbylý kilometr připočítán bod. 



V jednom kraji lze získat maximálně 
600 bodů. Pro větší obtížnost zadává 
někdy počítač i města z jiného kraje 
než zkoušeného. Po probrání všech 
10 krajů vyhodnotí počítač výsledek. 

Zobrazení měst: v 1. částiv 2. části 

nad 1 000 000 O O 

100 000—1 000 000 O O 

50 000— 100 000 + o 

25 000— 50 000 + 

10 000— 25 000 

(stav k 1. 4. 1982) 

Obsluha programu 

Program nahrajeme příkazem 

CHAIN (skládá se ze tří záznamů). Po 
vykreslení obrysů republiky začne bli- 
kat u některého města šipka. Napíšeme 
název tohoto města (bez háčků 
a čárek). Počítač kontroluje pouze 
prvních šest písmen a na chybu reagu- 
je již při prvním nesprávném písmenu. 

V druhé části ovládáme zaměřovač 
(blikající křížek) pomocí šipek. Po 
umístění zaměřovače na žádané místo 
stiskneme tlačítko „1“. Myslíme si, že 
zadané město není v příslušném kraji, 
stiskneme tlačítko ,.1“. Myslíme-li si, že 
měřovače nezáleží). Nesprávné určení 
kraje se hodnotí jako chyba 50 km. 
Nebyla-li odpověď přesná, označí bli- 
kající šipka správné místo. 

Popis některých podprogramů 

INIT — zinicializuje pole 
Q(10,2) — souřadnice map krajů 
N&(10) — názvy krajů 
T$(6) — texty vyhodnocení 
— načte z mgf pole 



X(203) — x souřadnice měst 
Y(203) — y souřadnice měst 
0(203) — počty obyvatel ve městech 
H(444) — zakódované hranice ČSSR 
K(338) — zakódované hranice krajů 
M$(203) — názvy měst 

— načte z mgf tvary miniznaků (64 na 
řádek) 

(tisk miniznaků pomocí GOSUB 0M1) 
START — vynuluje pole Z(203) 

— příznaky, zda město bylo již jednou 
vybráno 

KRESLI — spustí hraní hudby (GOSUB 
$M3) 

— nakreslí obrysy kraje nebo republiky 
(GOSUB ŠM2) 

— nakreslí příslušná města 

— nakreslí rámeček s nápisy 

— počká, až dohraje hudba 
DIST — vyhodnotí odpověď hráče: 

— zmýlil-li se v kraji, pak Dl=50, 

— jinak Dl = vzdálenost zaměřovače od 
města v km, 

— je-li Dl <4, pak Dl=0. 

KEY 

— je-li stisknuto tlačítko se šipkou, 
pohybuje zaměřovačem v jejím směru, 

— stiskne-li se „1“, vrátí se na STRIL. 

— stiskne-li se „2“, vrátí se na MIM. 

Některé proměnné: 

KR — číslo kraje (0=ČSSR), 

DC — dovolená chyba (v 1 . části počet 
omylů, v 2. části počet kilome- 
trů), 

BO — počet bodů, 

PO — číslo pokusu, 

Dl — vzdálenost zaměřovače od měs- 
ta, 

DV — příznak, že bylo stisknuto tlačít- 
ko „2". 



620 ( MtM ) 

630 1 


DV-1 


640 ( STRIL ) 



2201 zablikej fipkou 
I u správného 
mésta 
T 
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Výpis programu „Města“ 



rw o^* ahu * c d*ta o městech, tj. zakódované hranice Krajů a republiky, souřadnice a názvy mést a počty obyvatel. Těchto dat by bylo asi 8 str. A4. 
¥yps je určen pro pochopeni problematiky a ukázku programovací techniky. Program byt sestaven pro počítač SORDM5 s BASIC-G a paměti EM-32). 


10 rem (c) jan Jelínek ml. 1936 

100 gosub /init 

11 C gosub /start 

120 console 1 : kr-0 

130 gosub /kresli 

140 dc-2 

150 for po«1 to 5 

160 locate 22,2:ml/«num/(po):gosub /ml 

170 locate 26,3:ml/-num/(dc)+* kraťrgosub /ml 

180 m-rnd(3l );me»-1 

190 repeat 

200 me-me+1 

210 lf o(me)b»500 then m-m-1 
220 until rocO 

230 if z{me)then goto 130 else z(me)»1 

240 loc 1 to(x fme )-m2x )/2+2, fy (me )-ir.2y )/2+2 

250 on event gosub /sip 

260 event 25sevent on 

270 repeatsuntil inkey/-” 

280 m- len (m/ fme ) ) :n«0: lf mb6 then m-6 
290 n-ntl 

300 r-ascii(inkey/):if r--1 then goto 3C0 else p«r and 31 
310 c-ascll (mid/(m/(me ) ,n ) )and 31 

320 lf p-c oř p-5 and c-6 or p»21 and c«22 then goto 380 

330 event offjscol 1,0splay ‘rge-cge-c’ : locate 19,5:ml/-left/(m/ 

(me ) ,n-1 )4chr/(r hgosub /mt 

340 locate 1 3,6:ml/- 'spatnf - spravnf bylo:’:gosub dmi 

350 locate 18,7:m1/»m/(me):gosub /ml 

360 dc-dc-1 

370 gotp 420 

390 if n»m then n«18 

39C locate 13,5:ra1/-left/(m/(me ),n):gosub jřrr.1 
400 if non then goto 290 

~Í10 event offsscol 1,C:play ’cegcegc2’ : locate 19,6:m1/«*spravnf , 
uhodl jste/»:gosub /ml 
420 for n-1 to lOCCCinext 
430 locate 18,5:m1/«rpt/(26, • • ):gosub /ml 
440 locate 18,6:gosub /ml : locate 18,7:gosub /ml 
450 lf dcb-0 then next po else goto /konec 
460 loc 0 to 129,96 
470 consoLe C:for kr-1 to 10 
480 gosub /kresli 
490 dc-100 

500 zro-q (kr-1 ,0):repeat: zm-zm+1 :unti l o(zm)c500 
510 km-q(kr,C)-1 
520 for po-1 to 5 

530 locate 22,2:m1/-num/(po):gosub /ml 

540 locate 26,3:m1/«num/(dc )+’ km ’:gosub /ml 

550 me«rnd (kro-zm)+zm 

56C if z(me )then if mi then goto 550 else me-me+1 C0+200*(me:>1 00) 

imi»1 else z(me)-1:mi-C 

570 locate 19,5:m1/«m/(me hgosub /ml 

580 dv«0:on event gosub /krlz 

590 on key gosub /key 

600 event 25: event on: key on 

610 goto 610 

620/mim 

630 dv-1 

640/stril 

650 gosub /dist 

660 dc«dc-di:if dcb-C then bo-bo+100 

670 if di then m1/«*spletl jste se o ^num/fdi)** km* else ml/-* 
jresny zasah/* 

680 locate 1S,6:gosub /ml 

690 locate 27,2:ml/-num/(bo):gosub /ml 

700 loc 1 to sx+1,sy+1 

710 on event gosub /slp 

720 if dl then event on else play ’cjegcegc2’ 

730 for n»i to I0000:next 
740 event offiscol 0,0:scol 1,0 


750 locate 18,5:m1/-rpt/(26, ’ ‘hgosub /ml 

760 Locate l8,6:gosub /ol 

770 if dcb-0 then next po:bo-bo+dc 

780 next kr 

790/konec 

800 fcol 7: locate 0,11:gmode 0 

810 for n»0 to 5 

820 print/l rpt/(26,‘ • ) 

830 next n 

840 box 0,88,207,135: locate 1,12 

850 ml/-*dosahl Jste ’+num/(bo)+‘ bodv z 6000 možných*: gosub /ml 

860 print ‘wb*!; ml /-‘dnešní rekord: ’+num/(re)+‘ bodv’: gosub /ml 

870 print •»£’; ;m1/-t/(bo/1 000 h gosu b /ml 

880 print , j^ , i:m1/«* chcete hrát znovut (a/n)’:gosub /ml 

890 if bobre then re-bo 

900 lf inkey{0)-0 then goto 900 

910 if inkey(0)-25 then goto 110 else print ’x' :stchr: console 1: 
end 

920/d.ist 

930 gmove/0:di-0 

940 if mi then sx-152:sy-64 else sx-x(me)-m2x:sy-y(me)-m2y 
950 if dv then ml-mi+1 
960 if mi-i then di-50 
970 if mi then return 

980 d2-dist(sxx3/2,sy,pos(2)ti3/2,pos(3)):if d2— 1 then di-200:re 
turn 

990 repeat :di-di+1 :unti l dl’ 2bd2 
1000 if dic4 then di-C 
1010 return 
1020/sip 

1030 scol 1 ,sprite(1 ,3)xor 7 
1040 play »g8‘ 

1050 return 
1060/kriz 

1070 sc»L'o,sprite(0,3)xor 7 

1080 play ’c32‘ ' 

1090 return 
11 00/key 

1110 if inkey(0)then goto, 1150 '* 

11 20 move 0 on/0 
1130 event on 
1140 return 

1150 event off;scol 0,7 

1160 if inkey(0)-9 then key off:return /stril 
1170 if inkey ( 0)-1 0 then key off:return /mim 
1180 if inkey(0)-55 then move 0 step 1,0,2 
1190 if inkey (0)»54 then move 0 s.tep-1,0,2 
1200 if inkey(0)»46 then move 0 step 0,1,2 
1210 if inkey (0)-51 then move 0 step 0,-1 ,2 
1220 return 
1230/kresli 

1240 ginit:gmode 4:gosub /m3 

1250 scod 0,139:scol C,0:scod I,l40:scol 1,0 

1260 m2m-l-(kr-0):m2x-q(kr ,1 ):m2y-q(kr ,2) 

1270 m2-varptr(h(0)):fcol 6:gosub /m2 

1290 if kr then goto 1350 

1290 fcol 1,1 

1300 for n-0 to 203 

1310 if o(n)<500 then goto 1330 

1320 gmove (x (n )-m2x )/2, (y (n )-m2y )/2: circle 1- (o(n )51 000)- (o(n)>1 

oooc) 

1330 next n 
1340 goto 1400 

1350 m2-varptr (k(0)):fcol 12:gosub /m2 
1360 fcol 11 

1370 for n-q(kr-1 ,0)to q(kr,0)-1 

1330 gmove x(n)-m2x,y(n)-m2y:eircle-(o(n)b250)~(o(n)i500)-(o(n)S 
1000)- (o(n)bl 0000) 

1390 next n 

1400 gmode 0:for n-0 to S:prlnt/l cursor (17,n)rpt/(15,‘ ’):next 
1410 fcol 5: box 136,0,255,72 

1420 locate 13,2:m1/-»pokus: body: *+num/(bo hgosub /ml 

1430 locate 13,3:ml/“’dovolena chyba: ’ :gosub /ml 
1440 if kr then goto 1480 
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1450 locate 19,1 sart/^ceskoslovensko^gosub /ml 
1460 locate 1 8,4 :ml/« • jaké je to mf stot* :gosub /ml 
1470 goto 1510 

1480 locate 18,1 :ml/-' kraj: *4mim/( kr )+' - *+n/(kr ):gosub /ml 
1490 locate 18,4:ml/-*hledejte mf sto: (potom *1’)*:gosub /ml 
15CC locate 18,7sm1 /«**2* - neni v tomto kraji ’:gosub /ml 
1510 fcol 9 

1520 if play(0)then goto 1520 

1530 return 

1540/init 

1550 randomize:re-0 

1560 print ' uslvsl *:: ten 18 

1570 dim q (1 0,2) ,n/(1 0) ,z(203 ) 

1580 for n«0 to 10: for m«0 to 2 
1590 read q (n,m ) 

1600 next m,n 

1610 for n-1 to 10:read n/(n):next 
1620 old 'datarepub* 

1630 dlm m/(2C3 ) ,x{203 ) ,y (203 ) ,o(203 ) ,h(444 ) ,k(338) 

1640 pokew /7264 ,4080, var ptr («/(0 ) ) ,0:call /0e7d 
1650 pokew /7 264, 408, var ptr (x (0) ) ,4080:call /0e7d 
1660 pokew /7264,408,varptr (y (0) ),4488:call /0e7d 
1670 pokew /7264,4C8,varptr (o{0) ),4e96:call /0e7d 
1680 pokew /7264 ,890,varptr (h (0) ) ,5304:call /0e7d 
1690 pokew /7264 ,678,varptr ( k ( 0 ) ) ,61 94:caLL /0e7d 
1700 ten 50:dim t/{6):ml/->* 

1710 for n»o to 6:read t/(n):next 
1720 print * vrv * 

1730 otd *m51minizn* 

1740 stchr *f OcOa 0900804 0201 • to 140 
1750 return 
1760/start 
1770 bo-0 

1780 for n«0 to 203iz(n)-C:next n 
1790 print *jí’; 

1800 return 

1810 data 0,8,-33,19,53,10,28,59,98,41,0,54,63,37,0 

1920 data 83,138,14,107,138,96,140,204,34,167,212,182,190,270,13 

0,204,351 ,112 

1830 data středočesky, jihočesky, západočesky , severočesky, vychodoc 
esky , j ihomor avsky , sever omoravsky 

1840 data západoslovensky .stredoslovensky .vychodoslov. 

1950 data je to hryza - nemate ani zakladni přehled/, za vas vyko 
n by se stydfl i šimpanz/ 

1860 data vas výkon je veLmi slabý - bfzte si odpočinout/, ’neni 


to nej horši, ale zkuste se zlepšit/* 

1870 data 'mate velmi dobry přehled, jen tak dal/*, jste az moc c 
hytry (anebo švindlujete)/ 

1880 data to je podvod s vámi nechci hrát/ 

30COC/ml 

30010 gmode 0:for ml-1 to len(m1/) 

30020 print/1 chr/(ascii (mid/(ml/,m1 ,1 ) )+1 28* (ml mod 2))j 
30030 if mi mod 2 then print *5*}:gmode 4 else gmode 0 
3C04C next; gmode 4 
30050 return 
3006 O/m 2 

30070 poke /71 20,/f e,0,/2C,2,/7e,/23,/fe,3,/c8,/cd ,Ac,/71 ,/c5,/ 
d5,/c1 i/dl ,/cd,/4c,/71 ,/c5,/d5,/d ,/dl ,/c9-44n(m2m-1 ) 

30080 poke /7138,/73,/fe,0,/20,/0c,/7a,/fe,0,/20,7,/7b,/fe,/c0,/ 
30,2,/fl ,/c9,/f1 ,/l8,/d4 

30090 poke /7l4c,/f5,/e6,3,/fe,3,/20,1 ,3,/fe,1 ,/20,1 ,/Cb,/f 1 ,/cb 
,/3f ,/cb./3f ,/c9 

30100 if peekw(m2)—1 then return 

30110 pokew /7262,0,peekw(ra2)-m2x,peekw(m2+2)-m2y ,m244 
30120 call /712C 

30130 plot peekw(/7 264 )/m2m , pee kw (/7 266 )/m2m 

3C140 if peek(/7263)-3 then m2-peekw(/7268):goto 30100 else goto 
30120 
301 5 O/m 3 

30160 len 32:restore 30290:m3«0 
30170 on event gosub 30200 
30180 event 30: event on 
301 90 return 

30200 read m3/:if m3/>-*a’ then goto 30270 
30210 m3»ra3+l ■ 

30220 if val(m3/)then m3n-o3:repeat :read m3p/:until fli3p/«*/*-Mn3/ 
30230 if m3/-’x* then restore 30290:m3»0:repeat:read m3/:m3-m3+1 
:unti l m3«m3n 

30240 if m3/«’.' then event off:return 
30250 if left/(m3/,1 )0*/* then goto 30200 
30260 event vaL(mid/(m3/,2) ):goto 30200 

30270 m3-m3+3:play m3/:read m3/: pLay ,m3/:read m3/:play, ,m3/ 

30280 return 

30290 data 05l4s1t2l5,05l4s1 ,o5l1s1 ,1 ,1 ,2,3,/55,b-agg,d2.o4go5 ,f 
,4,5,6,7,7,2,b-ag2,c1 ,e 

30300 data 4,b-ag2,d2.o4go5,f ,5,c2c2,rl ,r 

30310 data /I ,b-agr,c2.o4go5,e,*,/2,b-agg,c2.o4go5,e,i* 

30320 data /3,b-agr,c1 t e,*,/4,b-agr,d2.o4go5,f ,* 

30330 data /5 ,gge-d ,f o4gabo5 ,r ,*,/6 ,cr2. ,co4bo5ce,r ,* 

30340 data /7,b-ag2,c2.o4go5,e,w 
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SLOVNÍK 


M. Kaftan 


Neratovická 32 
182 00 Praha 8 


Program Slovník slouží v šesti základních způsobech použiti k ukládáni, 
uchování, automatickému řazeni, vyvoláni a případnému vytištění slov 
v kterémkoli cizím jazyce. Jednoduché úkony jsou voleny tak, aby Slovník 
optimálně plnil svůj účel jako praktická a rychlá doplňková jazyková pomůcka. 


Slovník je určen pro používání na 
osobním počítači ZX Spectrum s vhod- 
nou kompatibilní tiskárnou. Základní 
verze programu je přizpůsobena pro 
tisk prostřednictvím Interface 1. 

K jeho hlavním výhodám patří: 

— možnost vlastního zápisu slov 
s jejich okamžitým samočinným 
abecedním zařazením, 

— rozsah do 800 použitelných slov, 

— vyvolání celých stránek v počtu 18 
výrazů nebo jednotlivých slov, 

— možnost rychlých vlastních úprav 
(vymazávání, doplňování, opravy 
textu) podle potřeby 

— aplikace na magnetofonových pás- 
kách či microdrivu a vhodné tiskár- 
ně. 


Výklad programu 


I. Základní výběr (menu) 

Program Slovník umožňuje variabilní 
využití těchto základních módů: 

1. Zápis nových výrazů ..NOVÉ SLOVO 

2. Změna dvojice výrazů na jejich 

opačné pořadí ZMĚNA VERZE 

3. Vyvolání zapsaných slov 

na displej ČTENÍ SLOVNÍKU 

4. Nahrání do počítače/uchování 

záznamu LOAD/SAVE 

5. Použití tiskárny VYTIŠTĚNÍ 

6. Zkoušení jednotlivých 

slovíček ZKOUŠENÍ SLOV 

Další část je zaměřena na podrob- 
nější popis výše uvedených variant 
funkce. 


Základní výběr (menu) je východis- 
kem každého jednotlivého módu 
a následných operací. Objeví se auto- 
maticky na konci každé nahrávky po 
povelu „L.QAD". 

1. Zápis nových výrazů — NOVÉ SLO- 
VO 

Stiskneme-li ze základního výběru 
tlačítko 1, objeví se nejdříve výzva 
k potvrzení. Zmačkneme-li dále 
A (ANO), objeví se „stránka" slovníku, 
připravená k zapisování. Začátek zápi- 
su označuje žlutý kursor, který se při 
psaní automaticky posouvá. Stránka je 
rozdělena na dvě poloviny, z nichž 
každá má kapacitu 16 znaků. Počet 
řádků na každé stránce je 18. 

a) zapisování, pohyb kursoru 

Pohyb kursoru se ovládá příslušnými 
šipkami. Přechod z levé poloviny 
„stránky" na pravou se provádí tlačít- 
kem ENTER. Tímtéž tlačítkem se pře- 
vádí kursor po ukončení v pravé polovi- 
ně stránky znovu na začátek její levé 
poloviny. 

b) přepisování, vymazávání 

— „překlep", tj. chybu při psaní lze 
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jednoduše opravit tak, že se kursorem 
vrátíme zpět k poslednímu správnému 
písmenu a odtud začneme psát správ- 
ný text, 

— stejný účinek má tlačítko DELETE, 
které současně vymazává, 

— celý řádek lze vymazat současným 
zmačknutím SYMBOL SHIFT 

a S (NOT). Viz též odst. A/ll 

— pomocné tlačítko EDIT. 


c) značení počtu slov a číslování 
stránek 

Při zápisech se číslice objevují auto- 
maticky na spodním okraji displeje. 


2. Změna verze 

Změna verze se volí ze základního 
výběru tlačítkem 2. Výsledkem je 
záměna obou polovin na dotyčné strán- 
ce. Pokud je např. slovník organizován 
tak, že vlevo jsou zapisovány výrazy 
v cizím jazyce a vpravo jejich české 
ekvivalenty, po stisknutí tlačítka se 
jejich poloha zamění. Dochází rovněž 
automaticky k přechodu do módu 3, tj. 
čtení slovníku. 

3. Vyvolání zapsaných slov na displej 

— ČTENÍ SLOVNÍKU 

Stiskneme-li ze základního výběru 
tlačítko 3, objeví se po následném 
A (ANO) dosavadní zápisy počínaje 
stránkou č 1. Další stránky se vyvolají 
tlačítkem EDIT. 

I v módu č. 3 lze provádět dodatečné 
zápisy. Kursor se po celé ploše stránky 
posunuje pomocí tlačítek se šipkami. 

4. Operace LOAD a SAVÉ 

> Po tlačítku 4 a A (ANO) se nejdříve 
objeví výběr LOAD/SAVE k volbě tlačít- 
ky L (LOAD) nebo S (SAVÉ). 

a) nahrání záznamů do počítače 

— LOAD 

Stisknutí L dává alternativu použití 
magnetofonové pásky (tlačítko 0) nebo 
jednoho z 8 možných microdrivů (tlačít- 
ka 1 až 8). 

b) uchování záznamu — SAVÉ 
Postup SAVÉ je obdobný. Po volbě 

záznamové jednotky 0 až 8 se objeví 
nápověď „Název", pod nímž má být 
záznam uchován a který dopíšeme. Po 
stisknutí ENTER se nahrávají na pásku 
uložená slova, po čemž se v případě 
nahrávání na microdrive slova automa- 
ticky verifikují. Jestliže se nahrávají na 
pásku, pak lze verifikovat stisknutím 
„a“ po objevení „Verify". 

5. Vytištění 

Po stisknutí tlačítka 5 následuje nej- 
dříve upozornění, že program umožňu- 
je použití tiskárny pouze prostřednic- 
tvím ZX Interface 1 . Rozsah tištěného 
textu je od začátečního do koncového 
slova. 

6. Zkoušení slov 

Zkoušení (tlačítko 6) spočívá v udání 
(vepsání) přesného překladu k výra- 
zům, které počítač náhodně vybírá ze 
slovníku. Postačí k tomu stisknutí kte- 
réhokoli tlačítka po nápovědi „Zkou- 
šet?", po níž se napíše příslušný pře- 
klad (ekvivalent) k výrazu, který se 
objeví v rubrice „Slovo". 




Výpis programu „Slovník 0 








O REM *****»»»**»******«««**« »*»»«»» SLOVNÍK *** 

* * * * * MARTIN KAFTAN 1986 »« ****.****,***.,,,,,*,,, 

1000 REM 1 nicia 1 i zace* ******** * * 

ÍOOI CLEAR 69900: Dl M 1$<800,32>: DIM d$<6.15>: POKE 23609,90: LET r = 0: LET poc = 
O: LET n$=" STOP. . .menu EDI T . . . i nst rukce ": LET m$=CHR$ 16*CHR$ 7»CHR$ 17*CHR$ 

1*CHR$ 19*CHR$ 1: LET U$*CHR$ 16*CHR$ 0*CHR$ 17»CHR$ 6 

1002 RESTORE 1026: FOR p= 1 TO 6: BEEP .01.30*p: READ d$lp): NEXT p 

1003 RESTORE 1116: FOR p= 1 TO 28: READ d POKE 65499*p,d: NEXT p: GO TO 1021 

1004 REM Razeni podle abecedy*** 

1009 FOR p=poc-l TO 2 STEP -1: LET Sd-O: FOR c=poc-l TO poc p STEP -1 

1006 1F 1$(C*1 >• 1$<C> THEN LET f$=l$<c>: LET 1$< c > * 1$< c * 1 > : LET 1 $< C ♦ 1 > = f$ : LET 

sd^sd*l 

1007 NEXT c: LET p=p*<sd -O): NEXT p 

1008 RETURN 

1009 REM Vyhledáváni slova***** 

1010. INPUT "Hledane slovo:”: LINE z$: IF z$*"" OR z$=” ” THEN BEEP .2.20: GO TO 
ÍOIO 

1011 LET d I -LEN z$ : LET lo*2: LET po=poc: LET q = 2 

1012 IF l$(po. TO dl > = Z$ THEN LET q = po: GO TO 1019 

1013 IF l$(lo, TO dl>=Z$ THEN LET q=lo: GO TO 1019 

1014 LET ps=TNT (<po»lo>/2) 

1019 IF l$<ps. TO dl > = Z$ THEN LET q = ps: GO TO 1019 

1016 IF l$(ps) . Z$ THEN LET lo=ps 

1017 IF l$(ps) z$ THEN LET po=ps 

1018 IF polo 1 THEN GO TO 1014 

1019 LET yo* 1 NT <q/20>: LET yo=vo*18»l: LET y =q-yo* < q = yo » : GO TO 1058 

1020 REM Menu******************* 

1021 BORDER 1: PAPER 1: INK 7: CLS : PRINT INVERSE HAT 0,11;TAB 20;AT 1.11;” SL 
OVN1K " ; AT 2,11 ;TAB 20: PRINT AT 9.0;: FOR p= 1 TO 6: PRINT TAB 7 ; p d$< p >: 
PRINT : NEXT p 

1022 BEEP .1.20: PRINT AT 21,0;TAB 5; "Stiskni prislusne cislo";TAB 31: PAUSE NOT 
PI : LET c = PEEK 23560: LET w$^CHR$ c: IF w$»"l" OR w$>"6" THEN BEEP .1,1: GO TO 

1022 

1023 BEEP .1,30: PRINT u$;AT VAL "21", VAL "0";TAB VAL "8";" Potvrd lano) FLAS 

H l;w$; FLASH O ; TAB 31: PAUSE O: IF INKEY$< >"a" AND I NKEY $ "A” THEN GO TO 1022 

1024 REM Vet ven i **************** 

1025 BORDER 7: PAPER 5: INK O: GO TO 1 000*27* < w$= " 1 " OR w$ = "3” > » 59* < w$= “2" > * 6 1 * ( 
w$= ”4” ) *79* < w$ = ”5" > *97* < "6" ) 

1026 DATA "Nove s 1 ovo" , "Změna verze" , "ctěni sl ovniku" , "Load/Save" , "Vyt i steni " , ”Z 
kouseni slov" 

1027 REM Nove slovo a ********** Ctěni slovníku********* 

1028 LET C t = ( O AND W$="1">*(1 AND w$=”3">: LET x = 0: LET ox = x: LET xo = x' 

1029 CLS : IF w$="3" THEN LET yo* 1 : LET y=l: LET ov = y: GO TO 1058 

1030 LET yo= I NT (poc/18): LET yo*yo*18: IF yo< 1 THEN LET yo=l 

1031 LET y =poe -yo*2: LET oy*y: GO TO 1058 

1032 PRINT AT 0.0;m$;" " ;TAB 32'TAB < I NT (33-LEN d$< VAL w$ ) ) /2 > ; d$< VAL w$ > ; TAB 3 
2’ ; " " ; TAB 32 

1033 POKE 23659,0: PRINT PAPER 4; AT 22,0;" Počet slov:"; poc;" strana c.:";INT 
< vo/ 18 ) * 1 ; TAB 32 ■ n$ : POKE 23659.2 

1034 REM Pohyb a psáni na ****** obrazovku************** 

1035 BEEP .003,40: PRINT AT oy * 2, ox + xo ; 1 $< ov *yo , ox *xo * 1 ) ; AT y*2,x*xo; PAPER 6;1 
$< v.yo,x*xo* 1 ) : LET ov=y: LET ox=x 

1036 PAUSE O: LET c=PEEK 23560: LET a$=CHR$ c: IF c 31 AND c-128 THEN LET l$<y*y 
o,x*no» 1 )=a$: LET x = x ♦ 1 

1037 IF OX 15 AND c>31 AND c 128 THEN GO TO 1035 

1038 IF Ct THEN GO TO 1045 

1039 IF X 15 AND < C 12 > * C C - 13 > < O THEN LET X = X 1: BEEP .1,40: GO TO 1035 

1040 IF C* 13 AND 1$( v*yo . XO« 1 ) * " ” THEN BEEP .1,20: GO TO 1036 

1041 IF c* 13 THEN POKE 22592*x*xo* 32*y , 40 : LET v=y * < xo= 16 > : LET poc =poc ♦ ( xo= 1 6 > : 
LET XO = 0*(XC>= 16>* 16*<XO*0 > : LET OX-0: LET x*0 

1042 IF C* 13 AND XO=0 AND poc . 1 THEN GO SUB 1005: GO TO (1056 AND V 18)01058 AN 
D v - * 18) 

1043 IF c 13 AND X 0*0 AND poc 2 THEN GO TO 1033 

1044 IF < C 8 ) * ( c - 9 ) - O THEN LET x = x- < c =8 > * < C *9 ) : LET X = X *( X O > - ( X 1 5 ) : GO TO 1035 

1045 IF C = 12 THEN PRINT AT y*2.X*XO;” ";: LET X*X-1: LET 1 $( y *yo , X *XO*2 > * ” "• IF 
XO THEN LET X=0 

1046 IF < c -8 ) * < c -9 ) *0 THEN LET x = x- < c=8) ■* ( c *9 ) : LET y=y*(x 31>-(X 0>: LET x*x-32 

* < X 3 1 ) * 32* < X - O > : GO TO 1056 

1047 IF C*7 THEN GO TO 1091 

1048 IF C -226 THEN LET poc=poc*l: GO SUB 1005: LET poc=poc-l: GO TO 1021 

1049 IF NOT Ct. THEN GO TO 1035 

1050 IF C = 1 97 THEN GO TO 1029 

1051 IF C=204 THEN GO TO 1010 

1052 IF C ~ 195 AND poc O AND ( y *yo ) . * ( poc * 1 ) THEN FOR p=<y*yo> TO poc * 1 : LET l$<p 
>*l$(p»l>: NEXT p: LET poc*poc-l: GO TO 1058 

1053 IF C = 1 98 THEN LET vo = yo*18: LET y* 1 : LET X = 0: GO TO 1058 

1054 IF C. * 172 THEN GO TO 1030 

1055 IF <c-10)*(c-ll)=0 THEN LEI v=y * < C = 1 O 1 - ( C= 1 1 ) 

1056 LET yoy-yo: LET yo=yo* 18* ( y > 18 > - 18* < v 1 ) : LET y = y- 18* ( y > 18) * 18* < v 1> IF vo 
1 THEN LET yo=l 

1057 IF yoy =vo THEN GO TO 1033 

1058 FOR i = 1 TO 18: PRINT AT i * 2 , O ; 1 $) i *yo ) : NEXT i: GO TO 1032 

1059 REM Změna verze** ********* * 

1060 CLS : LET poc=poc*l: FOR i *2 TO poc: LET z$=I$<i. TO 16): LET I$( i , TO 16>= 
l$(i.l/ TO ): LET l$(i,17 TO >=z$: NEXT i: LET x=0: LET y=l: LET yo=l: LET w$="3 
": GO SUB 1005: LET poc^poc-1: GO TO 1058 

1061 REM LOAD/SAVE************** 

1062 CLS : BEEP .1,30: PRINT m$;AT 9,8;TAB 24;AT 10.8;" LOAD/ SAVEC 1 /s ) " ; AT 11,8 
;TAB 24: PAUSE O: LET c*PEEK 23560: LET w$*CHR$ c: GO TO 1 062*9* ( w$* " 1 ”)* 13* ( w$= 
"s" ) 

1063 INPUT "Název: "; LINE Z$: IF z$*"” THEN BEEP .2.1: GO TO 1063 

1064 IF LEN z$ 10 THEN LET Z$=(Z$( TO 10) > 

1065 RETURN . 

1066 BEEP .1,35: PRINT u$;AT 9.4;TAB 28;AT 10,4;" Kazet . < O > -M /dr i ve ( 1 8 > " ; AT 11 
,4;TAB 28: PAUSE NOT PI : LET C=PEEK 23560: LET W$=CHR$ c: IF w$ "O" OR w$ ' "8" TH 
EN BEEP .2,1: GO TO 1066 

1067 LET d=VAL w$ 

1068 RETURN 

1069 PRINT '"Verify <a/n>": PAUSE O: IF INKEY$="A" OR I NKEY$= "a" THEN PRINT AT 1 

9,0;" Přetoč kazetu na zacatek. pote PLAY": VERIFY z$ DATA l$c > 

1070 GO TO 1021 

1071 GO SUB 1066: IF NOT d THEN GO TO 1073 

1072 PRINT AT 0.0: CAT 1: GO SUB 1063: LOAD *"m";d:z$ DATA 1$(>: GO TO 1074 
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1073 GO SUB 1063: LOAD Z$ DATA 1$< > 

1074 LET poc = VAL 1*11 >: GO TO 1021 

1075 LET 1$<1>.STR$ poc 

1076 GO SUB 1066: 1F NOT d THEN GO TO 1078 

1077 PRINT AT 0.0: CA I 1: GO SUB 1063: SAVÉ * "m" ; d ; z$ DATA l$<>: PR1NT AT 12.4;" 
Ver i fy : VER1FY *"m";d;z$ DATA 1$<>: GO TO 1021 

1078 GO SUB 1063: SAVÉ zS DATA l$< >: GO TO 1069 

1079 REM výtisk pres ZX Interface 1 

1080 CLS : POKE 65523,29: RANDOM1ZE USR 65500: PR1NT U$;AT 6.3;TAB 29; AT 7.3;" ti 
POZORNEN1 : " ;TAB 29;AT 3,3 ;TaB 29 : AT 9.3:" Program je upraven pr o " ; T AB 29;AT 10.3 

tisk pres ZX Interface l.";TAB 29;AT ll.3;TAB 29 ;at 21.0;TAB 3; "Zmačkni jaké 
kol i v tlač i tko~ ;TAB 32: PAUSE O 

1090 FORMÁT " t" ; 300 : OPEN #4 : " t " : FOR P = 2 TO poc: PR I NT #4 ; )$<!>>: NEXT p: CLOSE 
#4: CLS : GO TO 1021 

1091 REM instrukce************** 

1092 CLS : PR I NT AT 4 . 1 1 ; " 1 NSTRUKCE" : PR 1 NT : PR 1 NT “Ni ze uvedeno operace je moz 
no Volat primo ze SLOVNÍKU. " 

1093 PR1NT AT l O , O ; " ' OR ' zpět na prvni stránku AND' na dalsi st 

ranku" AT ' na poslední stránku* STOP' menu NOT 

’ vvinazani radku TO' hledaní- slova" 

1094 PR 1 NT u$ ; AT 21.3;" ENTER navrat ke slovníku " 

1095 PAUSE O: LET c*PEEK 23560: IF C*13 THÍiN CLS : GO TO 1058 

1096 GO TO 1095 

1097 REM Zkoušeni sl ov* ******** * 

1098 CLS : PR I NT u$;AT 10.0;" Sl ovo : " . "Ekv i va 1 ent. : " ; TAB 32: LET n=0: LET a*l: LE 
T O = - 1 : LET k-0: LET ok = n: GO TO 1113 

1099 RANDOM1ZE : LET Z*INT CRND*poe>*2: LET y - 1 NT <RND*2) 

1100 IF v THEN LET xo=17: LET oX=l: GO TO 1102 

1101 LEI XO= 1 : LET ox*17 

1102 PR 1 NT u$;AT li.O;" ";l$<z.xo TO xo-15);TaB 32: INPUT "Ekvivalent.:": LINE z$ 
: IF z$”" OR z$=" " THEN BEEP .2.20: GO TO 1102 

1103 PR1NT U$ ; AT ,11, 1 6 ; Z$ ; TAB 32 : LET X = 0 * 

1104 FOR p=l TO 16: LET q=CODE l$(Z,OX*p TO OX*p>: IF q*32 OR q=44 OR q=59 THEN 

LET sd=p: GO TO 1106 " 

1105 NEXT p 

1106 LET c-0 

1107 IF ZS= 1$< Z , OX TO OX*Sd- 1 ) THEN LET Ok = á: GO TO 1110 

1108 IF NOT C THEN LET OX = OX*Sd»l: LET Sd * LEN ZS : LET c*l: GO TO 1107 

1109 LET ok*n 

1110 IF NOT ok THEN PRINT m$ ; AT 2.11;TAB 20;AT 3.11;" SPATNÉ! ”;AT 4 . 1 1 ; TAB 20: 
POKE 65523.28 

1111 IF Ok THEN PRINT INK 9; PAPER 3; FLASH 1 ; AT 2.11;TAB 20 ; AT 3.11;" SPRÁVNÉ " 
; AT 4.11; TAB 20: POKE 65523,29 

1112 PRINT AT 17,0; "Spravrie: " ' 1$( Z> : RANDOMI ZE USR 65500 

1113 LET 0 * 0 * 1 : LET k=k*<l AND ok): PRINT u$;AT 8.0;" Pokusu: ":o." Správných: " 
; k ; TAB 32: PRINT FLASH l:u$;AT 21.10;" ZKOUŠET ? " 

1114 PAUSE O: LET C-PEEK 23560: IF C*226 THEN GO TO 1021 

1115 PRINT U$;AT 21,0;" " ; T AB 32: GO TO 1099 

1116 REM BEEP 

1117 DATA 017. 100,098.038,010.058.072.092,031.031 .031.014.254.238.016.237. 121.06 
7.016. 254 . 037 , 032 . 244 . 028 . 021 , 032 . 232 ,201.058. 072 . 092 


II. Pomocné tlačítko EDIT 
Z módu 3 se lze prostřednictvím tla- 
čítek EDIT „dovolat pomoci*' v podobě 
souboru instrukcí, které dále zjedno- 
dušují a urychlují jak používání slov- 
níku, tak i jeho úpravy. 

Provedení jednotlivých úkonů 
umožňuje současné stisknutí SYMBOL 
SHIFT a některého z následujících 
tlačítek: 

OR — zpětné vyvolání 1. stránky 
z kteréhokoli místa ve slovníku. Použi- 
telné v módu 3 — „čtení slovníku*'. Kur- 
sor spočívá vlevo nahoře. 

AND — vyvolání bezprostředně násle- 
dující stránky. Použitelné v módu 
3 — „čtení slovníku**. 

AT — přesun na poslední stránku. 
Kursor spočívá na začátku posledního 
slova. 

STOP — návrat k základnímu výběru 
(menu). Použitelné v módech 1,3,6. 

NOT — okamžité vymazání celého 
řádku. Použitelné v módu 3. 

TO — vyhledávání určitého slova. 

Pozor: Před každým použitím SYMBOL 
SHIFT s dotyčným tlačítkem je nutno 
nejdříve vrátit se přes ENTER ke 
slovníku, a to k módu 3 — čtení slov- 
níku. 



Jaroslav Huba 


Sandrlk 320 

' 96661 HodruSe-Hámre 

Tento program umožňuje kresbu elektronických schémat, strojnických 
výkresov, titulných obrázkov k róznym programom a podobné, priamo pomocou 
tlačítok klávesnice počítača. Dokáže automaticky kreslit* viacero druhov čiar, 
a to butf módom PLOT (bod. po bode), alebo módom DRAW (čiarka za čiarkou) 
— viď význam jednotlivých tlačítok. 


Uživatel* programu má k dispozícii 
kresliacu plochu o rozmere štyroch 
obrazoviek, jedna obrazovka * jeden 
KVADRANT. Přechody z kvadrantu do 
kvadrantu sú riadené automaticky pro- 
gramovo pohybom kurzora. 

Ďalej je možné kedykorvek si nadefi- 
novat obrazce (šABLONKY), o maxi- 
málnej ploché 590 znakov, ktoré sú pri 
vkládání do památe automaticky číslo- 
vané a htavné údaje o nich sú zapísané 
v MENU ŠABLON, ktoré je uživaterovi 
k dispozícii kedykofvek, po stlačení 
vyvolávacej klávesy. Tento súbor maxi- 
málně 10 šablon je možné nahraf na 
mgf pásku a naopak, je možné si do 
programu dohrát už hotový šablonkový 
súbor z páskyrĎaíej móžeme nakresle- 
ný obrázok nahrat a uchovat na mgf 
pások, alebo si móžeme z páska 
prehrat obrázok do památe počl- 
tača. Při nespravnej manipulácii 
vypisuje chybové hlásenia,, na BREAK 
reaguje obvyklým spósobom. Uživatel* 


má taktiež k dispozícii pevne uložený 
NÁVOD NA POUZIVANIE, ktorý si móže 
vyvolat kedykorvek ho potřebuje. Pro- 
gram okrem BASICu obsahuje aj 
4 podprogramy (RUTINY) v strojovom 
kóde. 

UPOZORNENIE: Před nahratim pro- 
gramu si prepnite počítač do módu 
malých písmen! 

UžívatePské parametre: 

Kresliaca plocha: 348 x 508 bodov 
Ovládán ie: cez tastatúru pomocou 36 
tlačítok (malé i verké znaky) 

Počet funkcií: 46 

Počet uchovávaných obrazoviek (6079 
bajtov): 4 

Kapacita RAM pre šablonky: 4720 
bajtov 

Volné miesto pre BASIC: přibližné 200 
bajtov 

Volné miesto pre COOE: přibližné 84 
bajtov 


Typy kreslených čiar: 


- r 


Počet farieb: 8 
Druh farieb: ink 

Ovladanie zmien kvadrantov: automa- 
tické podra polohy kurzora 
Indikácia polohy kurzora: x — od 1 do 
254 

y — od 1 do 
174 


Technické parametre: 

RAMTOP: 35800 

Dížka programu v strojovom kóde: 
29730 bajtov 
Počet rutin: 4 


Organizácia RAM: 


Začiatok 

Koniec 

Názov 

tip 

Dížka 

23756 

35302 

SUPERDRAW 

LINE 27 

11546 

35800 

41879 

I.KVADRANT 

COOE 

6079 

41880 

47958 

II.KVADRANT 

CODE 

6079 

47959 

54037 

III.KVADRANT 

CODE 

6079 

54038 

58758 

ŠABLONKY 

CODE 

4720 

58759 

59135 

INI58759 

CODE 

376 

59136 

59293 

PAINT 

COOE 

158 

59323 

59348 

LASER 

CODE 

26 

59349 

59370 

rezerva 


22 

59371 

59398 

MEM0RY+ 

CODE 

28 

59399 

65478 

IV.KVADRANT 

CODE 

6079 

41192 

47 
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OCLEAR 35799: LOAD ""SCREEN* 
:BEEP .6, 20: BEEP .3, 40: FOR x = lT0 
4: BEEP .7 ,30: LOAD ""CODE : NEXT 
x : BEEP .5, 35: LOAD "" 

27 LET PR=VAL "O**: DIM T (VAL " 
4"): LET UA=VAL " 54038": LET T<1 
>=VAL “ 35800“: CLS s PRINT BRIG 
HT 1; FLASH 1;AT VAL "6", VAL "6" 
;"K R E S L I C + + +■•; FLASH O; 

BRIGHT Os LET KLP=1: LET ODK=VA 
L " 16384": LET DLZ=VAL "6079": P 
OKE VAL "59324", VAL "10": RANDOM 
I ZE USR VAL "59323": LET CQR=1: 
PRINT BRIGHT 1; FLASH 1;AT VAL 
"10", VAL " 10 " ; “S UPER "; FLAS 
H O; BRIGHT O: PAUSE VAL "100": 
CLS 

28 PRINT AT VAL “20" , O; "NEVYPI 
NAJ MAGNETOFON": LOAD " "SCREEN* 

: PRINT FLASH 1; "STLAČ KLÁVES"; 
FLASH O: PAUSE Ó 

29 LET ZRAD=0: GO SUB VAL "700 
": LET T(2)=VAL "41880": LET T<3 
) =VAL "47959": LET T(4)=VAL "593 
99" 

30 PAPER VAL ”7": LET HB=VAL 
"O": LET HR=VAL "O":' CLS : BORDE 
R VAL "5": LET x=VAL "127": LET 
y=VAL "87": LET zw=VAL "1": LET 
r=VAL "O": LET tocka=VAL "1": LE 
T bip=0: LET ink=0: LET ax=VAL " 
,127": LET ay=VAL "87" 

31 DIM H (VAL " 1 " , VAL "1"): DIM 
A (VAL "11", VAL "1"): DIM B (VAL 

"11", VAL "1"): DIM C (VAL "12",VA 
L "1"): DIM X (VAL "11"): DIM Y(V 
AL "11"): DIM U (VAL “12"): DIM b 
* (VAL "11", VAL “6") 

~ 32 INPUT "Medzery: ";zrr 

33 PRINT #1; "Stlač "; BRIGHT 1 
; "ERTDFXCVUI0P6LJZNMBS 0-7"; BRI 
GHT O 

34 PRINT #1 ; AT O, O; "x=" ; x ; TAB 


58 IF 

st="u' 

" THEN 

LET zw=0: L 

520 

IF INKEYfcO" " THEN GO TO V 

r=0: 

60 TO 

VAL "3 

3 M 

AL "5 

20" 

60 IF 

s*="i 

" THEN 

LET zw=l: L 

530 

GO TO VAL "33" 

r=0: 

GO TO 

VAL ”33" 

540 

IF F'R= 1 THEN GO TO VAL "57 

62 IF 

s*=" j 

'■ THEN 

LET zw=0: L 

0" 


r=l : 

GO TO 

VAL "33" 

544 

LET HB=HB+ 1 

64 IF 

s*="g 

" THEN 

INPUT "měno 

545 

IF HB > VAL "10" THEN GO TO 

1 ; 1 4>: SAVÉ 1*SCREEN* : GO TO VA 

VAL " 

8300" 

"33" 




547 

GO SUB VAL "8098": 60 SUB V 

65 IF 

s*="l 

" THEN 

INPUT AT 0, 

AL "8100" 

"Load 

měno?’ 

" ; 1 * : LOAD 1 SSCREEN 

550 

INPUT "VLOŽ ROZMĚRY SABLONK 

: GO 

TO VAL 

"33" 


Y V ZNAKOCH, SIRKA= ";X(HB);“ VYS 

66 IF 

s*="p 

'• THEN 

GO TO VAL " 

KA= " 

;Y (HB) 

>" 




551 

INFIJT "VLOŽ MĚNO SABLONK Y ( 

68 IF 

s*="o 

" THEN 

LET bip=NOT 

max 6 

, znakov) " ; b$ (HB) : LET U(l)= 

lip: GO TO VAL "33" 


VAL " 

54038" 

70 IF 

s*>="0“ AND 

s*<="7" THEN 

552 

LET U(HB+1)=U(HB)+(X(HB)*Y( 

LET i nk=VAL 

s$: GO 

TO VAL "33" 

HB) *8) 

72 IF 

s*="n 

" THEN 

LET xs=x : L 

554 

IF U ( HB+ 1 > >VAL "58758" THEN 

ys=y 

: GO TO VAL " 

33" . 

GO 

TO VAL "582" 

75 IF 

s*="b 

" THEN 

INPUT #1 ; AT 

556 

LET ax=x: LET ay=y: LET x=l 


O, O; TAB VAL "20" ; "Stupně: ";so: 

PLOÍr xs, ys: DRAM INK ink; OVER 

r; x-xs, y~ys, so/VAL "180"*PI 

80 IF s*<>"m" THEN GO TO VAL 
"140" 

90 LET rad=SQR ( (x-xs) * (x-xs) + 
(y-ys) # (y— ys) ) : IF rad=0 THEN G 
O TO VAL "33“ 

95 IF xs+rad>VAL "254" THEN G 
O TO VAL "33" 

97 IF xs-rad< 1 THEN GO TO VAL 

"33" 

ÍOO IF ys+rad >VAL "174" THEN G 
O TO VAL "33“ 

110 IF ys— rad<l THEN GO TO VAL 

-"33" 

120 CIRCLE INK ink; OVER r;xs, 
ys, rad 

140 IF s*="z" THEN GO SUB VAL, 
"9995": GO TO VAL "33" 

141 IF s*="s" THEN GO TO VAL ” 
32" 


: LET y=l : LET PAP=6 

557 FOR J=21 TO 22-Y(HB) STEP - 
1: FOR 1=0 TO X(HB)-1: PRINT PA 
PER PAP ; AT J,I;" ": NEXT I: NEXT 

J: LET PR=1 

558 IF ZRAD=1 THEN LET b*(HB>= 
"“: LET X(HB)=0: LET Y(HB)=0: LE 
T HB=HB— 1 : LET ZRAD=0 

560 PRINT #1 ; AT 0,0;"CISLO SABL 
ONKY= "; FLASH 1; BRIGHT 1;HB; B 
RIGHT O; FLASH O: PAUSE ÍOO: BEE 
P .5,10 

567 LET KR=0: LET PR=1 

568 IF PAP =7 THEN GO TO VAL “5 
85" 

569 GO TO VAL "33“ 

570 LET Xl=l : LET Yl=l: LET U(H 
B ) =UA : LET X2=X (HB) : LET Y2=Y(HB 
): LET PAP=7: LET zw=l: LET r=0 

575 GO SUB VAL "900" 

580 GO TO VAL "557" 

582 LET PAF=7: PRINT #1; FLASH 


VAL " ÍO" ; "y=" ; y; TAB 

VAL 

"20"; "QD 

142 

IF 

s*="K" 

OR s*= 

"k" 

THEN 

G 

1 ; AT 0,0; "POZOR PŘEKRAČUJE KAPAC 

R= " ; CQR 



D TO 

VAL 

"540" 





ITU RAM!": PAUSE VAL "ÍOO": PRIN 

35 LET s*=INKEY*: 

IF s*="" THE 

143 

IF 

s$= "h" 

OR s*= 

"H" 

THEN 

G 

T #1;AT 0,0;" 

N GO TO VAL "35" 



O TO 

VAL 

"600“ 





": LET U ( HB+ 1 ) =0 : L 

36 LET zr=l: IF s* 

= "E" 

OR s*=" 

144 

IF 

s*="w" 

OR s*= 

" W" 

THEN 

6 

ET ZRAD= 1 : GO TO VAL "558" 

R" OR s*="T" OR s*=" 

D" OR s*="F" 

O SUB VAL "700 

" 




585 GO SUB VAL "8099": GO SUB V 

OR s*="X" OR s*="C" 

OR 

s*="V" T 

145 

IF 

s*="q" 

OR s*= 

"0" 

THEN 

G 

AL "8100": GO TO VAL "8200" 

HEN LET zr=zrr 



0 TO 

VAL "800" 





600 LET PR=0: INPUT "CISLO SABL 

38 IF s*="a" THEN 

GO 

TO VAL " 

146 

IF 

s*="Z" 

THEN 

GO 

TO VAL 

.. 

ONKY?= " ; K 

500" 



8040' 

" 






610 IF (INT <X/8)+X (K) ) >32 THEN 

39 IF s*="0" THEN 

LET 

KLP=1 

147 

IF 

s*="B" 

THEN 

CLS 



60 TO VAL "690" 

40 IF s*="r" OR s* 

= "R" 

THEN L 

148 

GO 

TO VAL 

11 ** 




620 IF (INT < Y/8) +Y (K) ) >22 THEN 

ET dx=0: LET dy=l*zr 

: GO 

TO VAL 

200 

IF 

x+dx >— 

VAL "255" 

THEN i 

GO 

GO TO VAL "695" 

"200" 



TO VAL 

"8320" 





630: LET X2=INT (( X/8+1 )+( X (K) - 

41 IF s*="G" THEN 

LET 

KLF=2 

205 

IF 

x+dx<= 

0 THEN 

GO 

TO VAL 

1)): LET Y2=INT ( (Y/8+1 )+ (Y (K> -1 


42 IF s*="t" OR s*="T" THEN L 
ET dx=l*zr: LET dy=l*zr: GO TO V 
AL "200“ 

45 IF s*="-ř" OR s*="F" THEN L 
ET dx=l*zr: LET dy=0: GO TO VAL 
" 200 " , 

47 IF s*="v" OR s*="V" THEN L 
ET dx=l*zr: LET dy=-l*zr: GO TO 
VAL "200" 

50 IF s*="c" OR s*="C" THEN L 
ET dx=0: LET dy=-l*zr: GO TO VAL 

" 200 " 

52 IF s*="x" OR s*="X" THEN L 
ET dx=-l*zr: LET dy=-l*zr: GO TO 

VAL "200" 

54 IF s*="d" OR s$="D" THEN L 
ET dx=-l*zr: LET dy=0: GO TO VAL 

" 200 " 

56 IF s*=”e" OR s*="E" THEN L 
ET dx=-l*zr: LET dy=l#zr: GO TO 
VAL "200" 


48 
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"8350" 

210 IF y+dy >=VAL "175" THEN GO 

TO VAL "8370" 

215 IF y+dy<=0 THEN GO TO VAL 
"8400" 

240 IF r THEN PLOT OVER l;x,y 

250 IF zw AND NOT tocka THEN P 
LOT OVER 1 ; x , y 

260 LET x=x+dx : LET y=y+dy 

270 LET tocka=POINT (x,y> 

300 IF KLP=1 THEN PLOT INK in 
k;x,y 

301 IF KLP=2 THEN GO TO VAL "8 
020 " 

302 IF KLP=2 THEN DRAW INK in 
k ; dx , dy 

310 IF bip THEN BEEP VAL ".012 
" , VAL "44" 

320 GO TO VAL "33" 

500 IF INKEY$< >" " THEN 60 TO V 
AL ”500" 

501 IF INKEY*=" " THEN GO TO VA 
L "501" 

510 PRINT INK ink; OVER r ; AT A 
BS ( <174-y>/8-.45> ,x/8; INKEY* 

515 IF x<247 THEN LET x=x+8 


)): LET KR-1: LET X1=INT (X/8+1) 
: LET Y1=INT (Y/8+1): LET UAX=U ( 
K): GO SUB VAL "900“ 

632 LET zw=l: LET r=0: LET PR=0 
640 GO TO VAL "33" 

690 RANDOM I ZE USR VAL "59323": 
PRINT #1 ; AT O, O; "POSUN KURZOR DO 
LAVA O "; ( <X+(X(HB)*8) ) -VAL "254 
">: PAUSE VAL "150": PRINT #1;AT 
0,0;” ": GO T 

O VAL "33" 

695 RANDOM I ZE USR VAL "59323": 
PRINT #1 ; AT O, O; "POSUN KURZOR DO 
LU O "; ( (Y+(Y(HB)*8) > -VAL "174") 
: PAUSE VAL "150": PRINT #1;AT O 
,0;" ": GO TO VAL "33 

700 GO SUB VAL "8098": GO SUB V 
AL "8100": RANDOM I ZE USR VAL "59 
37 1 " 

703 CLS : RANDOM I ZE USR VAL "59 
323" 

705 PRINT AT O, 8; "NAVOĎ NA POUZ 
ITIE" ; AT 2, 4; "NA ZACIATKU SI PRE 
PNÍTE"; AT 3,4;" POCITAC DO MODU 
MALÝCH"; AT 4, 4; "PÍSMEN - ";"CAPS 


5. sig. 


SHIFT"; " + " ; "2" 

706 PRINT AT 8,2; "ERTDFXCV" ; " - 
POHYB KURZORU "- 

710 PRINT AT 10, 2; "u" ; " - KŘESL 
ENIE" ; AT 10, 17; "j";" - GUMOVANIE 
" i AT 12,2; "i";" - POHYB BEZ KŘES 
BY"; AT 14, 2; "p";" - HORUCI START 
" j AT 16,2; "g";" - SAVÉ SCR*" 

715 PRINT AT 16,21; "z";" - COPY 
" ; AT 17,24; "CONSUL";AT 19,2; "I"; 
" - LOAD SČR* M ;AT 19, 19; "s" ; " - 
MEDZERY" 

720 PRINT #1; FLASH 1 ; AT 0,0; "S 
TLAČ KLÁVES!"; FLASH O: PAUSE O 
725 RANDOMIZE USR VAL "59323": 
CLS ; PRINT AT 1 , 2; "n-m" ; " - KRU 
ZNI CA— STŘED = n";AT 2, 15; "POLOME 
R = m" 

730 PRINT AT 4,2; "a";" - PISANI 
E ZNAKOV " ; AT 6,2; "b";" - STUPNĚ 
SPOJENI A BODOV" 

735 PRINT AT 8,2; "K-k";" - VKLA 
DANIE ŠABLON"; AT 10, 2; "H-h" ; " - 
VYBERANIE Z RAM NA SCR*";AT 12,5 
(PODLÁ KURZORU. ..)"; AT 14,2;" 
Q-q";“ _ VYPIŠ MENU ŠABLON" ; AT 1 
8,2; "W-w";" - NAVOĎ " ; AT 16,2;" 
LOAD /SAVÉ ŠABLONY" 

750 PRINT #1,AT -1,0;" 

": PRINT #1 , AT 
O , O ; " STLAČ KLÁVESU ! " ; 

PAUSE O: CLS : RANDOMIZE USR VAL 
"59323" 

755 PRINT AT 2,2; "o - BEEP " ; AT 
4,2; "O - PLOT"; AT 6,2; "G - DRAW 

760 PRINT AT 8,2; "Z";" - FILL"; 
AT 10,2; "B";" - CLS" 

763 PRINT #1 , AT O, O; "STLAČ KLAV 
ESU": PAUSE O: GO SUB VAL "8099" 

: GO SUB VAL "8100" 

764 CLS : GO SUB VAL "8099"; GO 
SUB VAL "8100"; RANDOMIZE USR V 

AL "59371" 

765 RANDOMIZE USR VAL "59323": 
"RETURN 

800 LET PR=0: INPUT "CHCEŠ MENU 
? a/n";a* 

810 IF a*="a" OR a*="A" THEN G 
O TO VAL "820" 

815 GO TO VAL "33" 

820 RANDOMIZE USR VAL "59323": 

60 SUB VAL "8098": GO SUB VAL "8 
100": CLS 

826 PRINT AT O, 10; "M E N U";AT 
1,0; "Stav obsadenia pamate sablo 
nkami " ; AT 3,1; "CISLO" 

830 PRINT ÁT 3, 8; "MĚNO" ; AT 3,14 
; "VYS * SIR"; AT 3, 25; "ADRESA" 

835 FOR u=5 TO H6+5 

836 PRINT AT u,3;(u-4);AT u,7;b 
*(u-4);AT u, 15; Y(u-4) ; AT u,20;X< 
u— 4) ; AT u, 25;U(u-4) 

837 NEXT u 

840 INPUT "SAVÉ - LOAD SABLONKY 
s/l " ; a* 

845 IF a*="s" OR a*="S" THEN G 
O TO VAL "850" 

847 IF a*="l" OR a*="L" THEN G 
O TO VAL "870" 

849 GO SUB VAL "8099": GO SUB V 
AL "8100": GO TO VAL "34" 

852 LET H ( 1 , 1 ) =HB: FOR L=1 TO H 
B: LET A <L, 1 ) =X (L) : LET B(L,1)=Y 
(L): LET C(L,1)=U(L): NEXT L 

853 LET C (HB+1 , 1 ) =U (HB+1 ) 

854 INPUT "NAZOV SAVÉ SUBORU "; 
a$: SAVÉ a* DATA HO: SAVÉ "X" D 
AT A AO: SAVÉ "Y" DATA BO: SAVÉ 

"U" DATA CO: SAVÉ "b*" DATA b$ 
O: SAVÉ a*CODE U < 1 ) , U ( HB ) — U < 1 ) — 
1: GO TO VAL "849" 

870 PRINT #1 , AT 0,0; "ZAPNI MAGN 
ETOFON í ": LOAD "" DATA HO: LO 
AD " " DATA A O : LOAD " " DATA B < ) 

: LOAD " " DATA CO: LOAD " " DATA 
b*(): LOAD ""CODE 
872 PRINT #1 ; AT 0,0;"CAKAJ, UKL 
ADAM ! " 

875 LET HB=H (VAL "1",VAL "1"): 
FOR L=VAL "1" TO HB: LET X(L)=A( 


L, VAL "1"): LET Y(L)=B(L,VAL "1" 
): LET U (L) =C (L, VAL "1"): NEXT L 

880 LET U (HB+1) =C (HB+1, 1) : LET 
UA=U (HB+1 ) : GO TO VAL "849" 

900 PRINT #1; FLASH 1; BRIGHT 1 
; AT 0,0; "WAIT PLEASE ! " ; BRIGHT O 
; FLASH O: DATA 1,6, 1,6, VAL "920 
",7,14,7, 14, VAL "960", 15,22, 15,2 
2, VAL "1000", 1,6,7, 14, VAL "1010" 
,7, 14, 15,22, VAL "1050", 1,6, 15,22 
, VAL "1100" 

905 RESTORE : FOR H=1 TO 6 
910 READ H1,H2,H3,H4,CR 
912 IF Y 1 >=H1 AND Y10H2 AND Y2 
>=H3 AND Y2<=H4 THEN GO TO CR 
915 NEXT H 

920 REM ** zóna 1 ** 

921 LET SH=VAL “22432": LET HR= 
1: LET Z=1 : GO SUB VAL "930": GO 

SUB VAL "8000": RETURN 
930 LET D=X2— XI: LET C=SH-(Y1~H 
R) *32+256: LET A=Y2-Y1+1: LET E= 
Xl-1 

935 REM ** generovaní e adries * 

* 

936 FOR P=Z TO A: FOR R=1 TO 8: 
LET PA=C-(R*256) +E 

940 IF KR=0 THEN GO SUB VAL "1 
200": IF KR=0 THEN LET UA=UA+D+ 
1 

945 IF KR=1 THEN GO SUB VAL "1 
300": IF KR=1 THEN LET UAX=UAX+ 
D+l 

950 NEXT R: LET C=C-32: NEXT P: 

959 RETURN 

960 REM ** zóna 2 ** 

961 LEŤ SH=VAL "20448": LET HR= 
7: LET Z=1 : 60 SUB VAL "930": GO 

SUB VAL "8000": RETURN 
ÍOOO REM ** zóna 3 ** 

1001 LET SH=VAL "18400": LET HR= 
15: LET Z=1 : GO SUB VAL "930": G 
O SUB VAL "8000": RETURN 

1010 REM ** zóna 1 - 2 ** 

1011 LET Y3=6: LET SH1=VAL "2243 
2": LET HR 1=1: LET SH2=VAL "2044 
8 " 

1015 LET C2=SH2+VAL "256": LET C 
1— SH1— (Yl— HR1 ) *VAL "32"+VAL "256 
": LET D=X2-X 1 : LET A=Y3-Y1+1: L 
ET F=Y2— Yl+1 

1020 LET C=C1: LET Z=l: LET E=X1 
-1: GO SUB VAL "935": LET C=C2: 
LET Z=A+1 : LET A=F: GO SUB VAL " 
935": GO SUB VAL "8000": RETURN 

1050 REM ** zóna 2 - 3 *# 

1051 LET Y3=14: LET SH1=VAL "204 
48": LET HR1=7: LET SH2=VAL "184 
00": GO TO VAL "1015" 

1100 REM ** zóna 1-2-3’** 

1101 LET Cl= (VAL "22432" >— (Yl— 1) 
*32+256: LET C2=VAL "20704": LET 

C3=VAL 18656": LET A=6-Y1 + 1: L 
ET F=Y2— Yl+1 : LET D=X2-X1: LET C 
=C1: LET Z-ít LET E=X1-1: GO SUB 
VAL "935": LET C=C2: LET Z=l: L 
ET A=8: GO SUB VAL "935": LET C= 
C3: LET Z=l: LET A=Y2-14: GO SUB 
VAL "935": GO SUB VAL "8000": R 
ETURN 

1200 BEEP .05,35: LET ODK=PA: LE 
T DLZ=D+1: LET KAM=UA: GO SUB VA 
L "8100": RETURN 

1300 BEEP .05, VAL "40": LET ODK= 
UAX: LET DLZ=D+1: LET KAM=PA: GO 
SUB VAL "8100": RETURN 
8000 IF KR=0 THEN LET UA=UA-D 
8010 IF KR=1 THEN LET UAX=UAX-D 
8012 PRINT #1 ; AT 0,0;" 

8015 RETURN 

8020 IF x +dx >VAL "254" THEN GO 
TO VAL "8030" 

8022 IF x+dx< 1 THEN GO TO VAL " 
8030" 

8024 IF y+dy >174 THEN GO TO VAL 
"8030" 

8026 IF y+dy< 1 THEN GO TO VAL " 
8030" 

8028 GO TO VAL "302" 


8030 LET KLP=1: GO TO VAL "300" 
8040 RANDOMIZE USR VAL "59323": 
INPUT "Far ba INK výplně"; FAR 
8042 IF FAR<0 OR FAR >7 THEN GO 
TO VAL "8040" 

8044 PQKE VAL "59293" , FAR+56 
8046 RANDOMIZE USR VAL "59136“ 
8048 GO TO VAL "33" 

8055 RETURN 

8098 LET ODK=VAL "16384": LET D 
LZ=VAL "6079": LET KAM=T (CQR) : R 
ETURN 

8099 LET ODK=T (CQR) : LET DLZ=VAL 
"6079": LET KAM=VAL "16384": RE 

TURN 

8100 RANDOMIZE ODK: POKE VAL "59 
380" , PEEK VAL "23670": POKE VAL 
"59381 %PEEK VAL "23671": RANDOM 
I ZE DLZ: POKE VAL "59386", PEEK V 
AL "23670": POKE VAL "59387", PEE 
K VAL "23671": RANDOMIZE KAM: PO 
KE VAL "59383", PEEK VAL "23670": 

POKE VAL "59384", PEEK VAL "2367 
1": RANDOMIZE USR VAL “59371": R 
ETURN 

8200 LET PR=0: LET x=ax: LET y=a 
y: GO TO 33 

8300 RANDOMIZE USR VAL "59323" 
8305 PRINT #1; BRIGHT 1;AT 0,0;" 
KONIEC ŠABLON!"; BRIGHT O 
8310 PAUSE VAL "100" 

8315 RANDOMIZE USR VAL "59323": 
GO TO 33 

8320 GO SUB VAL "8098": GO SUB V 
AL "8100": IF CQR=1 THEN LET CQ 
R=2: LET X=1 

8325 IF CQR=3 THEN LET CQR=4: L 
ET X=1 

8330 GO SUB VAL "8099": GO SUB V 
AL "8100": GO TO VAL "300" 

8350 GO SUB VAL "8098": GO SUB V 
AL "8100" 

8355 IF CQR=2 THEN LET CQR=1: L 
ET X=254 

8360 IF CQR=4 THEN LET CQR=3: L 
ET X=254 

8365 GO SUB VAL "8099": GO SUB V 
AL "8100": GO TO VAL "300" 

8370 GO SUB VAL "8098": GO SUB V 
AL "8100": IF CQR=3 THEN LET CQ 
R=1 : LET Y=1 

8375 IF CQR=4 THEN LET CQR=2: L 
ET Y=1 

8380 GO SUB VAL "8099": GO SUB V 
AL "8100": GO TO VAL "300" 

8400 GO SUB VAL "8098": GO SUB V 
AL "8100": IF CQR=1 THEN LET CQ 
R=3: LET Y=174 

8410 IF CQR=2 THEN LET CQR=4: L 
ET Y=174 

8420 GO SUB VAL "8099": GO SUB V 
AL "8100": GO TO VAL "300" 

9990 FOR Q=P0ZYl/2 TO P0ZY2/2-2: 
LPRINT " ";: NEXT Q 

9991 IF AAA+BBB=2 THEN LPRINT " 
*";: RETURN 

9992 IF AAA=1 THEN LPRINT "o";: 
RETURN 

9993 IF BBB= 1 THEN LPRINT "o";: 
RETURN 

9995 FOR W=0 TO VAL "255": LET P 
OZY 1=0: FOR G=P0ZY1 TO VAL "173" 

STEP 2: LET AAA=PQINT (W,G): LE 
T BBB=PQ INT (W,G+1): IF (AAA+BBB 
) >0 THEN LET P0ZY2=G: GO SUB VA 
L "9990": LET P0ZY1=P0ZY2 

9996 NEXT G: LPRINT : NEXT W: LP 
RINT : LPRINT “OK": LPRINT : RET 
URN 

9999 CLS : GO TO VAL "900" 
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INI58759 - inicializačný program pre interface 


58759 / 33 159 229 62 0 119 35 119 

' 58767 / 33 197 92 62 183 119 62 230 
58775 / 35 119 201 0 0 0 0 0 
58783 /011 000000 

58791 / 22 25 30 2A0 29 32 253 21 

58799 / 32 248 201 0 0 0 0 0 

58807 / 33 160 229 52 71 62 144 211 

58815 / 127 21 9 31 203 71 40 30 120 

. 58823 / 211 63 205 167 229 62 1 211 

58831 / 95 205 167 229 62 0 211 95 

58839 / 205 167 229 205 167 229 126 254 

58847 / 98 204 71 230 201 205 84 31 

58855 / 56 215 20^ 255 0 0 0 0 

58863 / 0 6? 32 205 183 229 13 32 

58871 / 248 0 201 0 0 0 0 0 

58879 / 33 159 229 126 198 16 119 254 

53887 / 84 210 71 230 33 160 229 70 

58895 / 144 56 237 79 205 739 229 201 

58903 / 87 33 160 229 70 144 56 15 

58911 / 79 205 239 229 33 197 92 62 

58919 / 183 119 35 62 230 119 201 213 

58927 / 62 13 205 187 229 209 24 233 

58935 /00000000 
58943 /00000000 
58951 / 33 159 229 62 O 119 35 119 

58959 / 62 13 205 187 229 201 0 0 

58967 /GOOOOOOO 
58975 / 245 14 1 205 239 229 241 214 

58983 / 164 33 149 0 79 70 121 254 

58991 / 0 40 20 170 254 127 48 2 

- 58999 / 24 1 1 3 35 121 254 255 32 

59007 / 236 14 1 205 239 229 201 120 

59015 / 254 127 48 9 229 197 205 183 

59023 / 229 193 225 24 230 203 191 229 

59031 / 197 205 183 229 193 225 24 218 

59039 /00000000 

59047 / 1 A 1 205 239 229 20t 0 0 

59055 /O 0000000 
59063 / 254 5 48 1 201 254 24 56 

59071 / 5 254 31 48 1 201 254 127 

59079 / 56 8 254 164 48 4 205 167 

59087 / 230 201 254 23 32 11 33 197 

59095 / 92 62 23 119 35 62 230 119 

59103 / 201 254 165 56 4 205 95 230 

59111 / 201 254 13 32 4 205 71 230 

59119 / 201 254 6 32 4 205 255 229 

591 27L / 201 205 183 22 9 2011 


PAINT - program pre vyplnanie obrazcov 
591 35 /JLÍ58 125 92 95~58 126 92 
591 43 / 87 58 1 57 231 50 1 43 92 75 
591 51 / 66 66 205 84 231 75 4 120 

591 59 / 254 174 210 49 231 197 21 3 205 

59167 / 206 34 209 193 197 213 205 213 

59175 / 45 209 193 60 61 254 1 194 
59183 / 17 231 66 75 205 84 231 75 

59191 / 5 120 254 1 218 83 231 197 

59199 / 213 205 206 34 209 193 197 213 

59207 / 205 213 45 209 193 60 61 254 

59215 / 1 194 50 231 201 75 197 213 

59223 / 205 229 34 209 193 12 121 254 

59231 / 255 210 120 231 197 213 205 206 

59239 / 34 209 193 197 213 205 213 45 

59247 / 209 193 60 61 254 1 194 85 

59255 / 231 75 197 213 205 229 34 209 

59263 / 193 13 121 254 1 218 156 231 
59271 / 197 213 205 206 34 209 193 197 

59279 / 213 205 213 45 209 193 60 61 

59287 / 254 1 194 121 231 201 


LASER - akustický efekt 


59323 

5°331 

59339 

59347 


/ 6 10 197 33 0 3 1” 1 
/ 0 229 205 181 3 228 17 16 
/0 1*7 237 82 3 9 240 193 1_f 
/ 233 201 


MEMORY+ - relokatývny přenos dat v paafáti 

5° 37 1 1/ 245 1 97 21 3 229 221 229 253 229 
59379 / 33 216 139 17 0 64 1 191 
59387 / 23 237 176 253 225 221 225 225 
59395 1 / 209 193 241 201 


©- 

@ 
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pohyb kurzoru vodorovné 
vpravo po skokoch; 

SAVÉ obrazovky ako bežne 
SAVÉ SCREEN$; 
spósob kreslenia DRAW, pri 
kreslení kurzor pri stlačenom 
CAPS SHIFT a navolených 
medzerach kreslí spojitú čiaru 


Význam a funkcie tlačítok: 


Program je riadený stláčanim kláves, 
pričom sa rozlišujú malé aj veFké 
znaky. Veřké znaky sa zadávajú spolu 
zo stlačením CAPS SHIFT. 

Tlačit- Funkcia 

ko 

(a) písanie textu do obrázku, polo- 

” hu prvého znaku nastavíme 

kurzorom, stlačíme a a znak, 
ktorý chceme napísaf, před 
každým dalším znakom mu- 
síme stlačiť a; 

(g) určuje stupně spojenia dvoch 

rčznych bodov, prvý bod urči- 
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me kurzorom a stlačením n, 
druhý tiež kurzorom a stlače- 
ním b. Počítač sa opýta na 
stupně obluku, ktorým má da- 
né body spojit. Napr. pre 
priamku zadame úhoi 0; 
funkcia CLS; 

pohyb kurzoru po bodoch kol- 
mo nadol; 

pohyb kurzoru po navolených 
skokoch (MEDZERY) kolmo 
nadol; 

pohyb kurzoru vodorovné vřa- 
vo; 

pohyb kurzoru vodorovné vřa- 
vo po skokoch; 

pohyb kurzoru 45 stupňov vřa- 
vo hoře; 

pohyb kurzoru 45 stupňov vřa- 
vo hoře po skokoch; 
pohyb kurzoru vodorovné 
vpravo; 



po skokoch pri stlačenom u, 
pri stlačenom i kreslí čiarkova- 
nú čiaru s přerušováním 

o jeden bod ( ); 

vyvolávanie šablonok z pa- 
máte. Kurzorom sa dostaneme 
do miesta, kde má byt řavý 
dolný roh šablonky, stlačíme 
h (H) a udáme číslo šablonky, 
ktorá sa má nakreslit (vyvolat 
z RAM); 

pohyb kurzoru bez kreslenia 
pri móde PLOT, (stlačené O), 
přerušovaná čiara pri móde 
DRAW (stiačene G); 
mazanie starej kresby, bod po 
bode, prepnute na O; 
dvojfázove vkládanie šablonok, 
pri prvorň stlačení zadáme 
výšku a šířku vkládanej šablony 
a jej názov, potom- sa program 
vráti do režimu kreslenia 
a šablonku móžeme nakreslit 
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v tavom dolnom rohu obrazov- 
ky do priestoru, ktorý sa vyfarbí 
změnou PAPER. Druhým stla- 
čením k (K) šablon ku vložíme 
do paměti. Šablonky sú číslo- 
vané automaticky, maximálny 
počet je 10. Program je zabez- 
pečený proti vloženiu nespráv- 
ných rozmerov a rozmerov pre- 
kračujúcich kapacitu památe, 
ako aj proti prekročeniu počtu 
šablon; 

LOAD obrázku ako bežne LOAD 
SCREEN$; 

kresba kružnice, kurzor nasta- 
víme do požadovaného středu 
kružnice, potom stlačíme n, 
kurzor posunieme do miesta, 
kadiaf má kružnica prechádzať 
a stlačíme m; 

udanie polohy středu kružnice, 
udanie prvého bodu pri spájani 
bodov pomocou b; 
pri pohybe kurzoru bude re- 
produktor pískat; 
sposob kreslenia PLOT, bod za 
bodom; 

znovu nastartovanie programu, 
WARM START; 





pohyb kurzoru kolmo nahoru; 
pohyb kurzoru kolmo nahor po 
skokoch; 

udanie medzery (skoku) kurzo- 
ru pri súčasnom stlačení CAPS 
SHIFT, dížka skoku pri /O/, 
dížka čiary pri /G /; 
pohyb kurzoru 45 stupňov 
vpravo hoře; 

pohyb kurzoru 45 stupňov 
vpravo hoře po skokoch; 
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kreslenie podra kurzora; 
pohyb kurzora 45 stupňov 
vpravo dolu; 

pohyb kurzora 45 stupňov 
vpravo dolu po skokoch; 
po stlačeni sa inicializuje ovla- 
dači strojový podprogram 
a obrázok sa skopfruje cez 
mechanické strojové ttačiareň 
Consul 258; 

výplň uzavretých figér. Nakre- 
slíme nějaké uzavreté křivku 
(kružnica, štvorec...), vojde- 
me kurzorom dovnétra a stla- 
číme Z, potom udáme číslom 
farbu, ktorou chceme étvar vy- 
plnit; 

po stlačení sa objaví na obra- 
zovke výpis MENU ŠABLON, 
édaje o stave doposial vlože- 
ných šablon. Možno volat ke- 
dykolVek; 

po stlačení sa na obrazovke 
objaví výpis NÁVOD NA 
POUŽIVANIE. Možno volat ke- 
dykolvek; 

pohyb kurzoru 45 stupňov vfa- 
vo dolu; 

pohyb kurzoru 45 stupňov vřa- 
vo dolu po skokoch; 




stlačením jednoho z týchto tla- 
čítek sa navoli automaticky 
farba INK; 


CAPS SHIFT spolu s tlačitkami pre po- 
suv kurzoru umožňuje 
skákat o dopředu navole- 
né medzery (s). 






Grafické schéma programu mikroelektronika ’ss 51 




























Uživater má k dispozici! plochu Šty- 
roch obrazoviek, ktoré sa mu automa- 
ticky prepínajú ako náhle sa kurzor 
přiblíží k okrajů PAPER. Všetky štyri 
kvadranty sa ukiadajú v RAM a je 
možné ich jednu po druhej kopírovat 
(SAVÉ — g). vřavo dole, v edičnej zóně, 
sú neustále zobrazované údaje o oka- 
mžitej polohe kurzoru v súradniciach 
x a y, vpravo zase údaj o momentálnej 
polohe v kvadrante (QDR= Všetky 
dóležité stavy sú akusticky indikované 
a chybové hlásenie sa vypisuje taktiež 
v edičnej zóně. 

Poznámka: Pri přechode kurzorom 
s kvadrantu do kvadrantu je zakázané 
a nemóžme prejst cez rohy PAPER, 
třeba prechádzať cez hrany PAPER! 

Chybové hlásenia: 

KONIEC ŠABLON! — Počet šablon do- 
siahol 10. 

POZOR PŘEKRAČUJE KAPACITU 
RAM! — zadaná šablona sa nevmestí 
do priestoru určeného pre šablonky; 
POSUN KURZOR DOLU O... — ša- 
blonka by sa pri špatnom vyberani 
nevmestila do obrazovky, překročila by 
horný okraj PAPER; 

POSUN KURZOR DOLAVA O.. 
— šablonka překračuje pravý okraj 
PAPER. 


VYUŽÍVANÍ E STROJOVÝCH 

PODPROGRAMOV: 

Okrem programu v BASIC využívá 
KRESLIČ+ aj 4 strojové podprogramy, 
a to: 

INI58759 — inicializačný program pre 
interfejs, 

PAINT — program pre vypiňanie 
obrazcov, 

LASER — akustický efekt, 

MEMORY+ — relokatývny přenos dat 
v památí. 


Prvá pomoc pri „nabúrani" pro* 
gramu: - 

Pokiat by pri kreslení došlo k. vypad- 
nuti u z programu a CONTINUE by bolo 
neúčinné, znovunabehnutie programu 
bez akéhokorvek poškodenia nakresle- 
ného obrázku „ vykonáme odoslaním 
„nultého" příkazu GOTO 36. 

Pokíar systém odmieta přijat infor- 
mácie cez INPUT, jediná pomoc je 
RESET. 


Práca zo súborom šablón: 

Keď si chceme vytvořené šablony 
nahrat na mgf, vyvoláme si cez q (Q) 
MENU a na dotaz „SAVÉ— LOAD ŠA- 
BLONY? s/l“ odpovieme a vložíme 
měno, pod ktorým chceme súbor ša- 
blon uložit na pásku. Potom na obvyklé 
„Start tápe, then press any key . . 
stláčame Pubovornú klávesu. LOAD sa 
prevedie podobné. V menu sa vypisujú 
aj čistá adries jednotlivých šablon a ich 
dfžka, takže je možné program přerušit 
BREAK a nahrávat aj jednotlivé šablo- 
ny, čo je nepraktické a navýše hrozí 
možnost tahkého omytu. 
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suBROunre 

93* 


GQSUB935 

GOSUB8A0 


H 60513935 



GO SUB 935 

GosueaftW 



Poznámka: 

Je výhodné kreslit šablonky v III. 
kvadrante, pretože tym vylúčime 
možnost nechceného prepnutia kva- 
drantu pri pohybe kurzoru v doinej 
časti PAPER. Šablonky je možné vyvo- 
lávat len do plochy obrazovky! 

Informácie o róznych farbách 
v obrázku sa uchovává len pre obrázok 
právě kreslený na obrazovko, je tomu 
tak pre úsporu pamStového miesta, 
a je třeba s tým počítat pri kreslení 
farebných obrázkov, pri čiernobieiej 
kresba niet žiadnych tažkostí. 




























Tab. 1. Zapojení konektoru PK-1 


J. Bezdíček 

Mikropočítačové systémy se uplatňují prakticky ve všech oborech a aplikace 
přibývají. Stoupají požadavky na programové vybaveni. Přes množství u nás 
vyvinutých a předváděných vývojových systémů se však stále setkáváme s jejich 
nedostatkem. Proto se používají dostupné mikropočítače (mikroprocesor 
pracuje stejně výkonně ve vývojovém systému jako v „jednoduchém" mikropo- 
čítači; záleží jen na programovém vybaveni a pro efektivnost práce ještě na 
periferiích), na nich se programy odtaďujl a odladěné programy často ukládají 
do paměti ROM. Vznikají různá programovací zařízení, většinou podle typu 
právě používané paměti. Proto byl navržen a realizován programátor PGM-2, 
který je řešen modulárně a umožňuje programovat nejrůzriější typy pamětí. 
Obecně je možné použít pro řízení PGM-2 libovolný mikropočítač, který má 
dostačující zónu paměti pro čtená/ programovaná data a řídicí program. 
V článku je popsáno připojení k SAP1 1. 


Obr. 1. Blokové 
zapojení 
programátoru 
PGM-2 


Popis zapojeni 


PGM-2 se připojuje k SAPI 1 na 
sběrnici ARB-1 přes konektor 
K a plochý kabel. Vyžaduje dále připo- 
jení ke zdroji stejnosměrného napětí 30 
až 70 V, schopnému dodat alespoň 
200 mA. Protože i SAPI 1 „spěje" 
k paměti RAM 64 kB, byl programátor 
řešen jako periférie IN/OUT. Signály 
A5, A6 a A7 přímo řídí výběrové vs tupy 
ob vodů styku, společně se signály IOW 
a IOR. Dodatečně byl programátor 
doplněn jednoduchým dekodérem 
-(74188), který je umístěn přímo v krytu 
konektoru K. 

K připojení je použito obvodů 3212. 
Připojit programátor přes programova- 
telný PPI 8255 se ukázalo nevýhodné. 
Většinu signálů je stejně zapotřebí 
zesílit a navíc při přeprogramování 
8255 do jiného režimu se výstupy 
všech portů nastaví na úroveň L (jako 
po RESET), což by působilo potíže při 
procesu programování/verifikace 
v každé adrese. 


Tab. 2a. Ovládání obvodů pro styk mikropočítače s PGM-2. 


Na konektoru KP-1 jsou vyvedeny 
signály a úrovně napětí, potřebné pro 
všechny režimy práce s pamětmi. Při- 
řazení určuje Tab. 1. Při programování 
8748 je nutné rozšířit počet ovládacích 


13 

Signál 

B 

Signál 

i 

aO 1 


2 

i 


3 

a 1 


4 

+5 V 

napájení 

5 

a 2 


6 

+5 V 


7 

a 3 


8 

in 

nastavení 1 

9 

a 4 


10 

R3W 'i 


11 

a 5 

adresové 

12 

A 7 

■řízení 10 101 

13 

a 6 

'signály 

14 

m J 


15 

a7 


16 

d 7 OUT 


17 

a 8 


18 

d 6 OUT 


19 

a9 


20 

d 5 OUf 


21 

a 10 


22 

d 4 OUT 

výstupní data 

23 

a 11 J 


24 

d 3 OUT 

(programo- 






vání) 

25 

Cm 

čas. konstanta 

26 

d 2 OUT 


27 

-5 V' 


28 

dl OUT 


29 

+12 V 

-napájeni 

30 

dOOUT 


31 

Ucc > 


32 

D7 ~| 


33 

XTAL 

1 

34 

D 6 


35 

Y 

výstup 6 104 

36 

D5 


37 

A 

vstup 5 104 

38 

D 4 


39 

m 

uvolnění Uo 

40 

D 3 

<lata ARB-1 

41 

Rn 

nastavení U 0 

42 

D 2 


43 

Uo 

výstup stabil. 

44 

Dl 


45 

kT4 

vstup stabil. 

46 

DO J 


47 

+30 V 

napájení 

48 

d71N -i 


49 

$ n 


50 

d 6 IN 


51 

kT3 


52 

d 5íN 


53 

T2 

ovládání pro 

54 

d 4 IN 

vstupní data 

55 

kT2 

program 

56 

d 3 IN 

(čtení) 

57 

TI 


58 

d 2 IN 


59 

kTI J 


60 

d 1 1N 


61 

1 

zem 

62 

dOIN J 



*30 V- 


DO- D7 

napájeni 



řízeni 





L- -*sj 
I 


< 


/Ol 


doour- d70ur 


ARB- 


obvod 

funkce 

instr. 

adresa 

adresa s deko- 
dérem 

10 1 

data pro programování 

OUT 

20 H 

04 H 

10 2 

načtená data 

IN 

20 H 

04 H 

10 3 

řízení 1 

OUT 

40 H 

08 H 

IO101 

řízeni li 

OUT 

80 H 

0CH 


fiízení I 


bit 

103 

funkce 

úroveň 

význam 

b7 

Q8 

ovládání stabilizátoru 

L 

stabil. blokován 

b6 

Q7 

ovládání režimu IO 1 

L 

velká imped. IO 1 

b5 

Q6 

nulování čítače adr. 

L 

nulování 

b4 

Q5 

vstup čítače adr. 


další vyšší adr. 

b3 

Q4 

ovládání výstupu Q4 


Q4 

b2 

Q3 

ovládání tranzistoru TI 

H 

tranzistor sepnut 

bl 

Q2 

ovládání tranzistoru T2 

H 

tranzistor sepnut 

bO 

Q1 

ovládání tranzistoru T3 

H 

tranzistor sepnut 



Řízení II 


bit 

IO101 

funkce 

úroveň 

význam 

b7 

Q8 

výběr obvodu IO102/S2/ 

H 

obvod aktivní 

b6 

Q7 

řízení funkce I0102/S2/ 

L 

velká impedance 

b5 

Q6 

X 



b4 

Q5 

X 



b3 

Q4 

X 



b2 

Q3 

ovládání TO 

H 

mód programování 

bl 

Q2 

ovládání RESET 


latch adresy 

bO 

Q1 

ovládání tranzistoru T101 

H 

tranzistor sepnut 


signálů. Proto je na KP-1 vyvedena 
i datová sběrnice ARB- 1 (DO až D7) 
a adresový signál A7. Odpojení na- 
pájecího napětí pro programované 
obvody spínačem Z/V umožní jejich 
bezpečné zasunutí do a vyjmutí 
z objímky. 

Stabilizátor napětí je ovládán z KP-1, 
a to jak úroveň a proudové omezení, 
tak uvolnění (vstup R 108). Blokování 
se využívá například u 8748 tak, že 
signálem ALE nepřímo kontrolujeme 
správnost zasunutí 8748 do objímky 
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19, 20. 53, 54 10 

j_ — : 1 105, 106, 107 


0 ARB - 1 


Seznam součástek 


Rezistory 


100 Q. TR 151 
220 n, TR 151 
100 0, TR 151 
470 O, TR 151 
10 kO, TR 191 
TRI 91, 10 kO 
TR 191, 4,7 kO 
TR 191, 2,2 kO 
TR 191, 4,7 kO 
TR 191, 10 kO 
TR 191, 4,7 kO 
TR 151, 22 0 
TR 191, 180 
TR 191, 4,7 kO 




]C13 

T/ yf) 

lp 


R10 \ | 
lOkU 

JL -L 

Rtl 5 

4k7 

KSY 71 

KD606 


R15 TR 151, 330 0 
R16 TR 151, 330 0 
R17 TR 191, 4,7 kfl 
R18 TR 191, 4,7 kO 
R19 TR 191, 4,7 kO 


R20 TR 191, 4,7 kO 

R21 TR 191, 4,7 kO 

R22 TR 191, 4,7 kO 

R23 TR 191, 4,7 kO 

R24 TR 191, 4,7 kO 

















2xOA9 IŮÍ701 


umal 



BC177A 

BC313 

BC211 


JL Rn 

J2ÁLE 


R25 TR191,22kO 
R26 TR 191, lOkfl 
R27 TR 191, 1,2 kil 
R28 TR 191, 19 kil 
R29 TR 191, 3,3 kO 
R30 TR 191, 10 kO 
R31 TR 191, 1,2 kO 
R32 TR 191, 1 kO 
R33 TR 191, 1 kil 
R34 TR 152, 680 n 


Kondenzátory: 

C1.C2 

TEB91, 50 nF 

C3, C4, C7, 

C8, CIO, C12 

TK 783, 68 nF 

C5, C6 

TE 984, 50 nF 

C9 

TE 981, 20 kF 

Cil 

TE986, 20 (íF 

C13 

C14, C15 

TK 783, 33 nF 

C16, C17, C18 

TK 783, 47 nF 

Polovodiče 
lOI, 102, 103 

MH3212 

104 

UCY7406 

105, 106. 107 

MH7493 

108 

MH7474 

109 

MAA723 


TI 

BC177A 

T2 

BC313 

T3 

BC211 

T4 

KYS71 

T5 

KD605 

01 až D8 

GAZ51 

09 

LOI 701 

010 

U31101 

DII, D12 
Ostatní: 

0A9 

K 

konektor FRB TX 518 62 12 
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a jeho činnost. Není-li přítomen signál 
ALE, nesepne se programovací napětí 
ze stabilizátoru. Programování neúplně 
zasunutého obvodu by vedlo k jeho 
poškození. 

Adresové signály vznikají na čítačích 
105, 106 a 107. Vstup kaskády čítačů 
a nulování se ovládají z 103. Toto řešení 
je výhodné (pouze dva bity na ovládání) 
při adresování, které jde vzestupně. 
Pokud bychom chtěli někdy číst (pro- 
gramovat) jen určité adresy, musíme 
do programu zvyšujícího adresu vložit 
pomocné počítadlo, které nastavíme na 
požadovanou adresu a vstup dostane 
počet impulsů, potřebný k sestave- 
ní žádné adresy. 

Vhodně časované signály požadova- 
ných úrovní se řídí přes 103 progra- 
mem. Pouze ovládání T2 a T3 je 
zabezpečeno obvodově, protože jejich 
kolektory jsou u některých pamětí 
spojeny a při nesprávném programu by 
mohlo dojít k jejich současnému se- 
pnutí. To by vedlo (např. u 2708) 
k výpadku +12 V a narušení činnosti 
celého mikropočítače. 


Tab. 2b. Nastaveni bitů 103 a 10101 pro některé typy paměti. 


paměť bit 

b7 

b6 

b5 

b4 

b3 

b2 

bl 

bO 


2708 






PGM 

WE 

CE 

103 

blokování 

L 

X 

L 

L 

X 

L 

L 

L 


čtení 

L 

L 

H 

Ti 

X 

L 

L 

H 


programování 

H 

H 

H 

tl 

X 

tl 

H 

L 


2716 





CE 

Vpp 


OE 

103 

blokování 

L 

X 

L 

L 

L 

L 

L 
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L 

L 

H 

II 

H 

L 

L 

H 
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H 

H 

H 

tl 

tl 

H 

L 

L 
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103 
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L 

X 

L 

L 

L 

X 
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L 

L 

H 

tl 

H 

X 

L 

H 


programování 

H 

H 

H 

tl 

tt 

X 

H 
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PROM 
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103 
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H 

X 

L 

L 

L 

X 

L 

X 
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H 

H 

H 

tl 

H 

X 

L 

X 


programování 

H 

H 

H 

tl 

tl 

X 

H 

X 
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PROG 
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H 
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L 
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H 

103 
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H 

103 

H 
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L 
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H 

H 

H 

tl 
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L 
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L 
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H 
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10101 
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L 

H 
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L 
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L 

X 

X 

X 

L 
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A7 
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15. 16. 17, 18 

10 

42 

11 

41 
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43 

14 
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Y2 

Y3 

B 

C 

D 

E 

V 


MH74186 


W 


3 x 2k2 


13/101 

13/102 

13/103 
12 fépj\ 


Obr. 3. Dekodér adres 


19. 20. 53. 54 


navrhnout plošné spoje na počítači se 
systémem CAD, kde se práce spojené 
s návrhem a tvorbou DPS výrazně 
zkrátí, je časově výhodnější použít 
univerzální desku. 

Všechny paměti se měly původně 
připojovat jako moduly do konektoru 
KP-1. Na desce však nebyla využita 
celá plocha a tak jsem pro nejvíce 
používané paměti 2708, 2716 a 2732 
umístil objímky na základní deSku. Tím 
je možné zjednodušit programátor 
(pracuje-li se jen s těmito typy pamětí) 
tak, že se neosadf konektor KP-1 



Celkový vzhled a . 

vnitřní uspořádání j 
programátoru PGM-2 


PGM-2 byl sestaven na desce BDS-1 . 
Navrhnout (dobře) plošný spoj pro 
hustotu součástek a spojů, jaký je 
v programátoru, je práce vyžadující 
mnoho času. Pokud nebude možné 
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Obr. 4. Zapojení modulu pro programování PROM 
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060. D61 
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KY1 32/300 

KA206 

QA9 


Ostatní: 

KP-2 


TE31, 4.7 nF 
TK783, 33 nF 

konektor FRB 
TY 517 62 12 



Vzhled modulu pro programování 
PROM 


a propojky (nutné pro funkci progra- 
mování) se provedou drátovými spoj- 
kami podle zapojení modulu EPROM. 

K základní desce je zhotoven modul 
PROM pro paměti 74188, 74S287, 
74S571, modul EPROM s nutnými 
propojkami pro programování a modul 
mikropočítače 8748. 


Programové vybavení 

Údaje potřebné pro psaní programu 
jsou v tab. 2. Programy byly psány tak, 
aby nebyly delší než IkB a zajistily 
všechny nutné operace s pamětmi. 

Obvod 74188 je se svými 256 bity 
paměť nejmenší, ale vyžaduje poměrně 
komplikované programování. (Viz vývo- 
jový diagram na str. 59). 


Programátor PGM-2 byl nejprve 
řfzen SAPI-1 s deskou REM-1 (SRAM+ 
Mikromonitor). Pro desku DRAM 48 kB 
a Monitor V 4.0 byl řídicí program 
upraven. Ovládáme jej podle tabulky 
služeb — tab. 3. Programy se spouštějí 
příkazem G u Monitoru V 4.0 (u Mikro 
S). Po provedení příkazu se vypíše 
údaj, který nás informuje o výsledku. Je 
to adresa první chyby právě prováděné 
operace. U kontroly čistoty je to adresa 
prvního bajtu, kde není požadovaný 
obsah (u PROM a 8748 00H, u EPROM 
FF H). Při programování se vypíše první 
adresa, kde nedošlo k naprogramování 
dat, u čtení první adresa, která se již 





2 K KY130/300 2 *KA206 

Obr. 5. Zapojení modulu pro programování 8748 


Tab. 3a. Tabulka služeb pro Monitor V4.0. 
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čtení dat 

Kontrola 

čistoty 

Programo- 

vání 

74188 

74S287 

74S571 

2708 

2716 

2732 

8748 

1840 H 
184E H 
185CH 
186A H 
1876 H 
1882 H 
19B8H 

188E H 
18A0 H 
18ACH 
18B8 H 
18D3 H 
18DFH 
18C7 H 

1800 H 
1824 H 
1832 H 
18EB H 
1946 H 
197F H 
19FF H 


Tab. 3b. Tabulka služeb pro Mikromonitor. 



čtení dat 

Kontrola 

čistoty 

Programo- 

vání 

74188 

74S287 

74S571 

2708 

2716 

2732 

8748 

1846 H 
1854 H 
1862 H 
1870 H 
187C H 
1888 H 
19BEH 

1897 H 
18A6 H 
18B2 H 
18BEH 
18D9 H 
18E5 H 
18CDH 

1809 H 
182A H 
1838 H 
18F4H 
194C H 
1985 H 
1A05 H 


nečetla. U programování pamětí PROM 
se ještě vypíše počet bitů, které byty 
programovány na třetí pokus progra- 
movacím pulsem 20 ms (normální 
t=1 ms). Zobrazení je jen u Monitoru 
V4.Q. U Mikro musíme údaj ad resy 
vyvolat dodatečně. Je uložen na 9FFE 
a 9FFF H, údaj třetích pokusů PROM je 
na adrese 9FFD H. 

Příklad: po kontrole čistoty bude 
u dobré 74S287 výpis 0100 a u 2716 
výpis 0800. Po úspěšném programo- 
vání 74188 bude výpis 00 0020; dojde-ti 
k chybě při programování, vypíše se 
např. 03 001 1 (3 bity programovány na 
3. pokus a neúspěšné programování, 
chyba je na adrese 001 1 H). U správně 
naprogramované 2708 bude výpis 
0400. 

Jsou určeny pevně adresy, kam se 
začínají ukládat načtená data (A000 H) 
a kde jsou uložena data k programo- 
vání (C000 H). Řídicí program, přelože- 
ný do adresy 1800 H, je umístěn v 6. 
pozici EPROM desky REM-1. 


4 *5 v 


m - 4 


fW8 
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Obr. 6. Zapojení propojek pro programování pamětí 
EPROM 
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Řídicí program lze jednoduše modifi- 
kovat s ohledem na pevné určené 
adresy dat čtení/programování, adresy 
instrukcí IN/OUT i místa, kam se řídicí 
program uloží zménou direktiv v asem- 
blerovském programu. Tím lze jedno- 
duše přizpůsobit PGM-2 pro jiné poža- 
davky u SAPI 1, nebo i jiný řídicí 
mikropočítač. 


Závěr 


Programovací zařízení PGM-2 řeší 
programováni pamětí technicky jedno- 
duše a modulární uspořádání umožňu- 
je jednoduché rozšíření na nejrůznější 
typy pamětí. 

Ke každému programátoru pamětí 
EPROM patří také zařízení pro mazání 
těchto pamětí. Používá se ultrafialové 
světlo s vlnovou délkou 2537 A 
(Angstrdm). Zdroj světla musí být ve 
vzdálenosti 25 mm od okénka paměti. 
Doba pro vymazání je dána typem 
výbojky; u pamětí fy Intel je k vymazání 
zapotřebí energie 15 Ws/cm 2 . Pří- 
spěvek vznikl na podzim r. 1985. Dnes 
je programátor PGM-2 na deskách 
s plošnými spoji a pracuje i pod ope- 
račním systémem CP/M s komfortněj- 
ším programovým vybavením. 


Grafické 

schéma 

obslužn ého 

programu 
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Ing. Lumír Dvořák 


Souvislosti a velikosti fyzikálních hodnot součástek elektrických obvodů, průběhy a závislosti 
napětí a proudů v nich, to vše je dohromady vázáno základními matematickými vztahy. Měli by je znát 
i ti „nejzarputilejší** praktikové, protože umožftuji pochopit, co se v elektrických obvodech děje, proč 
se to děje, a jak to můžeme změnou jednotlivých součástí obvodu ovlivnit 
Proto jsme zařadili do této ročenky i tak nezvyklý a neobvykle zpracovaný příspěvek, „Kapky 
matematiky v elektrotechnice**. Nechť vám věem poslouží k neustálému opakování a obnovováni 
znalostí těch základních zákonitostí elektrick ých obvodů, s kterými přicházíte denně do styku. 

Základním pojmem při popisu periodických průběhů napětí a proudů v elektrických obvodech je 
goniometrická Fouiierova řada. Platí, že periodickou funkci f(t)=f(t±2k7i), kde k je přirozené číslo 
s periodou 2 «, která je v intervalu od 0 do 2n jednoznačná a konečná a má v tomto intervalu konečný 
počet nespojitostí, lze rozvinout v konečnou konvergentní goniometrickou Fourterovu řadu: 

f(t) = a 0 +a 1 cos t ♦bíSint *a 2 cos 2 t+b 2 Sin 2 t + 


2TT 


= 2V / 


f(t)dt 


J 


. ♦cínCos nt ♦ b„sinnt 

2TT 

Q n I f (t)COS ktdt 


21T 


b n = ~/ f (t)sin kt dt 




Lichoběžníkový průběh: 


f(t) = 


4A / sin* 
2TP i» 


sinuit + 


SÍn2ot 


sin3ut ♦ 


sin5oc 


sin5wt + . 


Obdélníkový průběh: 


4A / 1 1 

f (t )= +^-sin3wt + -g sin5wt * 


.... 4A [ cosojt cos 3wt cos5u>t f 
t,t,s TT ' 1 + 3 5 






Trojúhelníkový průběh: 

t(t)= ^~(-L slntot --~sin3uit + -^sin5ut- ) 

71* ' r 3* 5* ■ 
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f{t) = ; coscjt+-^cos3tL»t + -^cos 5u;t + 

tt 2 ' i 2 3 2 5 2 



clx A«c 2A / 1-cos«. , 1-cos2ot ^ , 1-cos3a ^ . \ 

f ^ = 2Ťf ŤŤŠT' — i* — cosu>t + p — cos2u»t* p — cos3wt + J 


Pilovitý prúbéti: 


f ít ) = ^p(smwt ♦ ysin 2 u>t + ^-sin3ujt ♦ 



ífll 2A/ . 1 . „ 1 . „ 

fit ) = — ^smcot ♦ — sm2u>t ♦ — sin3u»t * 


f(t)= ^(sinwt sin2ut*-^sin3ut - 


Jednocestně usmérnéný střídavý signál: 

fit ) =-~ ( 1 + y cosojt --jcos2íjt + -^-cos4 wt - 


fit) = £-(l*?cosut ♦ ~cos2<^t - cos 4 OJ t + 
h ' 2 3 15 



Dvojcestné usmérnéný střídavý signál: 

f (t) = ( 1 ~ 4 cos 2 wt -4-cos4ujt -§-cos 6 u>t 

ÍT ' 3 15 35 


3A / 2 2 2 

fit) = — \ 1 -— cos 6 u»t -^jcos 12 wt ~ 3 ^cos 18 ut - 
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Usměrňovači filtry RC Usměrňovači filtry tC Dolní propusti 


Článek T 


Z= Ví ~m 2 
*2 


,0 ' 2Tr«r 



LC = 2.5-~ 


Pa = činitel zvlnění na vstupu filtru (10) 
p = činitel zvlnéní pro mikrofon 0,001—0,0022 
pro nf zesilovač 0,01—0,05 
pro konc. stupeň 0,1— 0,5 


> L X L T 

SjíCo C »*» C -»» 

' 1 i 



■.■fW 

c-f W 

u>V? 

o 3000 Po 

R " C P 

_ 3000 Po 

L ' R P 

RC=3000-^ 

u * u "-íot6 

[ V; mA ; Q ] 

r 3000 \/PČ" 
L ‘ R V P 

RC=300o\/^- 

2 l 0 R 

U ‘ U ° 1000 




1500 Po 
C P 
1 500 Po 



1500 /Po 


1 500 W Po 


RC = 1 500 


-o P 



















Horní propusti Filtrační články RC 






c i =c 2 s 2TTf 0 R ~ C 


T = RC 

t 

u * Ue 7 


*b ■ 


1 


2TTRC 


c# — okamžitá hodnota napětí 
U — amplituda impulsů 
t — Časová konstanta obvodu RC 




t 
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hvězda — trojúhelník Paralelní řazení Sériové řazení 


Trojčlánkový filtr RC 


u «t C jjR C MR C MR U yýst 


f ° " 2TIRCV6 

Uvýst _ 1 

U v ,t ' 29 



, . 0 = 7 X 1 1 i — 

fd "V4C 2 Li Ci Li 2 VČTl; 2TT 


f -inzrzT i i _ 

h V 4C 2 L, C,Li 2TTVČ^Ú 2TT fd f, f h 


U 2TTŠ 

L Zš _ 
2 * 2TT(f d +y 


fs= 2 TT\ÍLf; ' 

, - Zš 
1_ 27T f d fh 

, - Z _ 

1-2 2TTŠ 


p Š 

1_ 2FZf d f h 

^ 2 2TTZŠ 


řfecT^ 

c ' = WzT 


Š = f h - f d 
Zvst = Zyýst = 



c ! » d J. 

2TTZf d f h ' 

Z«t = Zyý*t 


J 1 i 

fd fs fh T 




rezi s tory 


kondenzátory 


cfvky 


Ri Rz 


Li l 2 


R s =R^R 2 


Ri R 2 R 3 Rn 
R s = R, + R 2 + R 3 +....+ R n 


rezistory 



q Rl R 2 

“ r^r 2 


P 

s Ci+C 2 


OHI — II — H — Hl— o 

Ci C 2 C 3 c„ 

1 1.1 1.1 


kondenzátory 


Cp = C^Cj 


Rp Ri R 2 R 3 


z trojúhelníku do hvězdy 

1 R - R,z Rl 3 

Rl3 ^ ^ ^ RlZ 10 Rl2 + Rl3 + R 2 3 

o R R « R23 

20 R if Ri 3 + R23 

2 □ R i 3 R23 

30 Rl/Rl 3 + R 23 


l s = l 1 + l 2 




z hvězdy do trofttiebdku 


= Rn>R 2 o( 


J_ + J_ + 1 ] 

R10 Rz® R30 


— Rl3 'V 30 ! R 10 + R20 + R30 ) 


R 23 = ** 20 ^ R w + R w + R- 
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Slřidavý proud 
a střídavé napětí 


KirchhoffOv 

zákon 


stejnosměrný obvod 

U = Rl [V; Q; A] 

U _ u 


s t ej nosm ěrn éh o proudu 

P=Ui IW;V;A] 

P =RI 2 =-^ 


U = \fŘŘ 


střídavý obvod 


střídavého proudu 

= U I [ VA ; V; A J 

P =U!COS«p {W;V;A] 


efektivní hodnota střední hodnota 


u = -Msl = 1.11 u s 


první: 

Rv J? 

I, = !,♦ 1, 

l 2 + 13 “ li = o 


2U m 2V2U 

TT ~ TT 
2\m 2V2,I 

TT 7T 


U2 u a 


P q =U!simp lVAr ; V ; A] 


okamžitá hodnota 

u = U m sin u)t 
i = lm sinlcjt + y) 
u) = 2TTf 



u t = U 2 ♦ U 3 
ZíUZjl -u,= o 


Reaktanoe 


Rezonanční 

kmitočet 


kondenzátor 

v _ 1 _ 1 


cívka 


rezistor 


X c = -7T = ÍQ.s-VF] X l x coL =2TTfL [Q.š\H] X r =R IQ] 

L ujC 2 TTfC 


imr 


ÍH2;H;F] 


f Ó = -- ^ 3 -- [MHz./jH; pF ] 


Zdroje 


Dělič napětí 


sériové spojeni 


Ui u 2 
U c 


nezatížený dělič 


paralelní spojení 


U c = Ut +U 2 ♦....♦lín i? " C |u l e * I, +ln 


zatížený dělič 


R2 |Ui 


u ’= u Ř-^ sR ' 2 


u _ 1JB1R2 

1 Ri*R 2 R, + R 2 



vyvážený 

fi = Ra 

r 2 r* 

D - R 2 R 3 

Rl " Ri 
o _ Ri Rt 


a -Mi. 

2‘ R 3 

R - R 2 R3 

R, "^r 


, [Ri*R;)(R 3 R.) 
Ri + R 2 ♦ R 3 +R«, 


nevyvážený 


11 - u Rt • „ R 3 - URt UR 3 _ 

AB " r,*r 2 u r 3 + r* ~ r 12 r 34 " 


= l 12 Ri - l 34 R 3 = U 12 - U 34 


1 

9 ""ŘT 


^ab _ napětí na galvanoměru 
lg — proud galvanoměru 
Rg — vnitřní odpor galvanoměru 


Na obálkách letošní ročenky „Mikroelektronika* vás chceme seznámit s tfm, jak to vypadalo na výstavě ERA CTveŽďáru 
n. S. Na II. a III. straně obálky vidfte:CDzáběr do expozice Severomoravského krájej napáječi zdroj pro anténní zesilovač 
R. Smejkala z Jihlavy (3) tfípósmovou reprosoustavu ing. Z. Nováka ze ŽďáruíZ) expozici Jihomoravského kraje (5) přijímač 

f o amatérská pásma V. Zahradila z Ústi n. L.<B)stereo věž ing. P. Rusftáka z Března® univerzální čítač A. Prokeše z Brna 
alfanumerickouklávesnici M. Sípá z Plzně® modemy mg. V. Havla a kok z 6. Budějovic <10 osobní p rof e s io ná l n í počítač 
ISKRA ze SSSR (R) soubor učebních pomůcek pro el e k tr ot ec h niku kolektivu SOU MH z kutně Hory tfž soubor měřicích 
přístrojů čtrnáctiletého A. Ročka z 6. Lípy (uprostřed) ještě jeden záběr do exp o zi ce S ev e r o m orav s kého kraje 
simulační panel pro SAPI-1 — střední úpravna vody — kolektivu SP$ Písek. 
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PŘIPOJENÍ 

TISKÁREN C2111 a C2112 

K OSOBNÍMU počítači zx spectrum 


Ing. Aleš Kastner, CSc., ing. Pavel Vébr 


Sériové tiskací mechanismy Consul typy 2111, 2112 jsou snad nejrozšířeněj- 
SW mozaikovými tiskárnami ve výpočebtictretřecBscich v ČSSR. Při správné 
údržbě mají ostrý, dobře čitelný otisk a s formulářovým zařízením DARO mohou 
tisknout na skládaný tabelační papír bez kopie i s kopií. 

Osobní počítač Sinclair ZX Spectrum je u nás rovněž velmi hojně používán. 
Existuji pracoviště, kde se stal p ra co vní m nástrojem konstruktérů, návrhářů, 
architektů a jiných pracovníků vývoje. Právě jim je určen tento článek, který 
Popisuje spoiení uvedených prostředků výpočetní techniky a některé aplikace 
i s úpravami dostupného progr a m ov ého vybavení. 


Popisovaný adaptér a základní tisko- 
vý program vycházejí z řešení uvede- 
ného v [1]. Jde o tiskový program 
nahrazující původní tiskovou rutinu 
uloženou v pevné paměti (ROM) po- 
čítače. Dále je v [1] popsán adaptér 
přenášející 7 bitů každého znaku do 
sériového tiskacího mechanismu Con- 
sul 2111-03. Adaptér ani program však 
nebyl vhodný vzhledem k zamýšleným 
způsobům jeho použití: 

— tisku znaků s diakritickými znamén- 
—ky na upravené tiskárně Consul 

2111-03 (nutný přenos všech 8 bitů 
znaku), 

— plynulému tisku na tiskárně Consul 
2112, která nemá start/stop režim, 

— automatickému rozpoznání typu tis- 
kárny. 

Z tohoto důvodu byl adaptér vyřešen 
zcela nově, takže obslouží tiskárny Con- 
sul 2111-03 a Consul 2112 bez úprav 
i s úpravami. Také tiskový program byl 
přepracován. Jeho varianta, vhodná 
pro tisk písmen s diakritickými zna- 
ménky byla začleněna do textového 
editoru TASWORD, který byl rovněž 
upraven tak, aby dovolil pořizovat 
a tisknout texty obsahující všechna 
písmena malé i velké české abecedy 
včetně některých grafických znaků pro 
tvorbu tabulek a diagramů. Základní 
varianta je určena pro použití v jazyku 
BASIC a byla zařazena také do „data- 
bázového" programu VU-file. 

Popis adaptéru pro spojení ZX- 
Spectrum s C2111, C2112 


Základní částí adaptéru je, obdobně 
jako v [1], střádač 8 bitů typu MH 3212. 
Slouží pro uchování a vysílání dat pro 
sériový tiskací mechanismus. Vzhle- 
dem k tomu, že k přenosu dat je využito 
všech 8 bitů střádače, není možno pro 
vytvoření signálu SC (řízení přenosu 
dat z adaptéru — viz tabulka 1) použít 
stejný způsob, jako v [1 J. Pro tento účel 
je užit pomocný klopný obvod, který je 
součástí střádače MH 3212. Vhodným 
zapojením bylo dosaženo, že bez- 
prostředně po každém zápisu nových 
dat do střádače je nastaven pomocný 
klopný obvod, jehož stav se po ukonče- 


ní zápisu objeví na výstupu IT střádače. 
Napětí z tohoto výstupu se přímo 
využívá jako signál SC. Pomocný klop- 
ný obvod je nulován týlem signálu AC 
— viz tabulka 1. 

Zbývající část adaptéru je navržena 
zcela nově a je tvořena pamětí typu MH 
74S287 nebo ekvivalentem, např. so- 
větským obvodem KR 556 RT4. Obsah 
této paměti musí vyhovovat těmto lo- 
gickým rovnicím: 

Y1=Á + B + C + Ď + E + F 
Y2 = X + B + C+ B + E + G 
Y3 =Á+B+C+D+E+H 
Y4 = X + B + C + D + E 

kde: A, B, C, D, E, F, G, H jsou adresové 
vstupy paměti, 

Y1, Y2, Y3, Y4 jsou informační výstupy 
paměti (musí být s otevřeným kolekto- 
rem). 

Obsah paměti zajišťuje, že adaptér 
pracuje jako vstup-výstupní brána, 
v jejíž adrese musí být A0 = H, A1=L 
a A3=H. Tomuto požadavku vyhovuje 
adresa 9, anebo lépe adresa 253, která 
je v systému ZX-Spectrum vyhražena 
pro tiskárnu. Pro adresování adaptéru 
lze využít i adresního bitu C paměti 
PROM, na který je v tomto provedení 
připojen signál M 1 řídicí sběrnice. 
Tento signál měl původně sloužit 
k rozlišení operace vstup-výstup od 
cyklu přerušení, při kterém signál 
IÓRQ, stejně jako při vstup/výstup 
operacích, nabývá úrovně L. Podle 
stavu adres sběrnice v okamžiku pře- 
rušení potom hrozí nebezpečí, že 
vstupně výstupní kanál reaguje na 
přerušení jako na vstupně výstupní 
operaci. Vzhledem k dů sled nému pou- 
žiti obou signálů RD i WR není však 
využití signálu Ml nutné a lze tedy 
příslušný adresový vstup paměti PROM 
použít pro adresování adaptéru (nej- 
lépe vyjmutím kontaktního pera sběrni- 
cového konektoru adaptéru a drátovou 
propojku na plošném spojí adaptéru). 

Vstupní brána, která vznikla napro- 
gramováním paměti PROM, umožňuje 
přenos tří bitů informace ze sériového 
tiskacího mechanismu. Z toho je jeden 
bit použit k přenosu signálu AC do 
počítače. Po provedení instrukce IN se 
tato informace objeví v bitu D7. Další bit 


TabaĚat 1: Zapojeni a signály konektoru Consul 
2111 , 2112 



Typ STM: + — pouze Consul 2111 
* — pouze Consul 2112 


(Dl) je použit k přenosu signálu A O 
(připravenost tiskárny k provozu). 
Zbývající bit (D4) nemá pevné určení 
a lze jej použít libovolně např. 
k přenosu signálu AI-2 (provádění 
řádku — viz tabulka 1), což umožňuje 
počítat skutečný počet řádků, ale není 
vyloučen ani přenos jiného signálu 
(přepojením na konektoru k tiskárně). 
Schéma adaptéru je na obr. 1. 

Adaptér je umístěn na destičce 
s oboustrannými plošnými spoji o roz- 
měrech 43x73 mm. Do otvoru v des- 
ce je ze strany spojů zasunut 
a zapájen konektor typu WK 465 80 
zkrácený na 28 párů kontaktů. Typ 
konektoru je nutno dodržet, neboť 
velmi podobný konektor WK 180 18 má 
poněkud odlišnou rozteč kontaktů. Ne- 
použitá kontaktní pera jsou vyjmuta, 
takže kontaktní pera zůstávají na těchto 
pozicích: 

A3, A6, A7, A9, A10, A11, A12, A21, 
A22, A23, A24, 

B3, B6, B7, B8, B9, BIO, BII, B12, 
B17, B18, B19, B24. 

Konektor je podložen vhodnou di- 
stanční podložkou, např. destičkou 
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Obr. 2b. Rozložení součástek na desce s plošnými spoji Obr. 1. Interfejs ZX-Spectrum — Consul 2111-03/2112 

W508 interfejsu ZX Spectrum — Consul 



Obr. 2a. Obrazec plošných spojů interfejsu ZX Spectrum — Consul na desce W508 


tloušťky zhruba 3mm s otvory pro 
vývody kontaktních per, a zasunut na 
doraz. Před zapálením je vhodné kon- 
taktní pera ohnout k destičce pro 
mechanické zpevnění. Pro spojení 
s tiskárnou je použit plochý mnohožilo- 
vý vodič PNLY 20x0,15, z něhož je 
použito 17 vodičO. Délka spojovacího 
vodiče nesmí přesáhnout 3 m. Vodič je 
upevněn dvojím protažením podélným 
otvorem v horní části destičky a je 
zakončen konektorem ConsuL 

Základní varianta tiskového pro- 
gramu 


Základní tiskový program je určen 
pro tisk znaků kódu ASCII modifikace 
Spectrum včetně tisku klíčových slov 
jazyka BASIC. Program lze využít k ti- 
sku příkazy LPRINT (PRINT #3) 
a LLIST. Nelze tisknout obsah obrazov- 
ky (příkaz COPY). Znakový repertoár 
tiskáren Consul se lidí od kódu ASCII- 
Spectrum v těchto znacích: 

— „dolar" (24h) je nahrazen měnovým 
znakem ,F“, 

— „libra" (60h) znakem 


68 


— „šipka vzhůru " (5Eh) znakem 

vlnovka " (7Eh) znakem nadtržení 

M 

— „copyright" (7Fh) je nahrazen meze- 
rou. 

V kódu ASCII -Spectrum je několik 
služebních znaků, které mají při tisku 
tento význam: 

— 06h (čárka v PRINT) — interpretuje 
se jako tabelace na nejbližšf zarážku 

— sloupce 1, 17, 33, 49, . . ., 

— 09h (BAC KS PÁCE) — zpět o znak 
(jen C2111), 

— OAh (CHR$ 10) — řádkování (jen 
C2111), 

— OBh (CHR$ 11) — vertikální tabelace 
(jen s formulářovým zařízením DARO 
1160), 

— OCh (CHR$ 12) — posun na začátek 
nové stránky, 

— ODh (ENTER nebo apostrof v PRINT) 
— nový řádek, 

— 12h, 13h, 14h (FLASH 1/0, BRIGHT 
1/0, INVERSE 1/0) — změna barvy (jen 
C2111) 1 -červená, 0-černá, 

— 17h (TAB n) — posun na sloupec 
určeného čísla, 

— iBh (CHR$ 27) — zpětný řádek (jen 
C2111 bez DARO 1160). 


Není vhodné tisknout texty s ukazateli 
AT na tiskárně. Tento atribut tiskový 
program zcela ignoruje, právě tak jako 
atributy barev. Kódy od OOh do IFh 


neuvedené v tomto výčtu jsou nahraze- 
ny znakem Kódy od 80h do A4h 
jsou nahrazeny znakem 
Twkový program obsahuje část ini- 
cializační a část výkonnou. Inicializačni 
část nastaví způsob stránkování, počty 
řádků na stránce a znaků na řádku, 
nuluje počítadla a při prvním spuštění 
určí typ tiskárny podle délky odezvy na 
znak „návrat vozu“. Způsob stránko- 
vání si určí uživatel podle toho, zda 
hodlá tisknout na jednotlivé listy nebo 
rolovaný či skládaný tabelační papír 
a má-li tiskárnu opatřenou formulářo- 
vým zařízením DARO. 

Inicializace se spustí příkazem jazyka 
BASIC 

RANDOMIZE USB a+x, 

kde: a je počáteční adresa programu (v 
základní verzi 64200), 
x je 0, má-li program počítat řádky 
a stránkovat 50, stránkuje-ti pilotní 
páska zařízení DAR0 1160, 100, bude-li 
se tisknout na jednotlivé listy. 

Počet znaků na řádku lze zadat příka- 
zem 

POKE a+10,n (standardně n=1 28). 
Pokud má program počítat řádky (x je 
0 nebo 100), je počet řádků na stránce 
možno změnit příkazem 
POKE 8+11,11 (standardně n=68). 

Počet řádků vynechávaných na konci 
stránky (přeskočení přehybu) se dá 
změnit příkazem 
POKE a+12,n (standardně n=4). 
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Poslední dvě hodnoty dávají v součtu 
celkový počet řádků na stránce (nej- 
častěji 72), který musí být při změně 
dodržen. Po změně kterékoli z těchto 
hodnot je nutná nová inicializace. Nenf- 
li tiskárna při inicializaci zapnuta, ozve 
se akustický signál, který trvá tak 
dlouho, dokud uživatel tiskárnu neza- 
pne nebo dokud nestiskne BREAK. 

Výkonná část programu interpretuje 
každý znak a tisknutelné znaky ukládá 
do vyrovnávací paměti. Po příchodu 
znaku s kódovou kombinací ODh se 
obsah této paměti vytiskne na jeden 
řádek. Při tisku se vynechávají pravo- 
stranné mezery. Uvedený způsob tisku 
dovoluje požít Consul 2112 a navíc 
zkracuje dobu tisku. 

Znak OCh (nová stránka) se interpre- 
tuje okamžitě. Je-li nastaven režim 
tisku na jednotlivé listy, nebo přijde-ii 
tento znak, je po odpočítání stanove- 
ného počtu řádků na stránce vydán 
akustický signál, tisk se zastaví 
a operátor může vyměnit list papíru 
v tiskárně. Podržením BREAK lze navíc 
program zastavit na konci každého 
řádku. V obou případech se ozve 
zvukový signál, po němž má uživatel 
tyto možnosti pokračování: 

— klávesou „Z“ zastaví tisk s návratem 
do systému BASIC a s hlášením „D 
BREAK — CONT repeats“. 

— klávesou „C“ pokračuje v tisku 
dalším řádkem, 

— klávesou „1“ provede inicializaci 
počitadel, program předpokládá tisk 
od začátku nové stránky, nutno ještě 
stisknout klávesu „C“. 

Tiskový program ve své základní 
variantě nepoužívá „PRINT buffer“ na 
adrese 5B00h. Vyrovnávací paměť je 
umístěna těsně za všemi instrukcemi 
programu a s její délkou je třeba 
počítat. Aby byla oblast „PRINT buffer" 
využita, lze změnit poslední řádek pro- 
gramu na 

Buf EQU # 5B00 


Zdrojový program je určen pro pře- 
kladač GENS3 (Hisoft). 


Použití tiskového 
programu v programu 
VU-file 


Program VU-FILE pracuje se soubo- 
ry záznamů kartotéčního charakteru. 
Jednotlivé záznamy lze pořizovat, při- 
dávat, měnit a rušit Formáty zobrazení 
a tisku lze podle potřeby definovat. Do 
programu VU-FILE byl přidán tiskový 
program, který se inicializuje po zave- 
dení komplexu programů do operační 
paměti. 

Ke své činnosti využívá tato varianta 
programu systémovou vyrovnávací pa- 
měť tisku na adrese 5B00h. 

Úpravy textového editoru 
Tas word 

V repertoáru znaků upravené tiskár- 
ny Consul 2111-03 jsou malá i velká 
písmena české abecedy (s diakritic- 
kými znaménky), znaky pro tvorbu 
tabulek a rámečků a speciální znaky. 
Česká varianta editoru textu — (TAS- 
WORD/Cs) u nás dostupná však obsa- 


huje pouze 14 písmen malé české 
abecedy s diakritickými znaménky 
a znak pro háček za písmenem. Cílem 
úprav programů TAS WORD bylo: 

— umožnit tisk celé české a slovenské 
abecedy i přehlásek, 

— umožnit tisk rámečku a tabulek, 

— vkládat uvedené znaky z klávesnice 
bez použití grafiky, 

— doplnit generátor úzkých i širokých 
znaků pro zobrazení. 

Nejprve byla vytvořena speciální va- 
rianta tiskového programu s určitými 
zvláštnostmi. Hlavní změna spočívá 
v tom, že do tiskárny jsou posílány 
všechny kódové kombinace 20h až 7Fh 
a AOh až FFh (a některé další). Nedo- 
chází ke konverzi kódů větších než A4h 
na klíčová slova jazyka BASIC. Pro- 
gram nepočítá s příchodem tiskových 
atributů jazyka BASIC s výjimkou tabu- 
látoru a změn barvy, akceptuje však 
řídicí kódy pro posun formuláře. Při 
tisku na C2112 převádí písmena 
s diakritickými znaménky na odpovída- 
jící písmena bez nich. 

Ve strojové části programu TAS- 
WORD byla nejprve změněna rutina 
pro zobrazení úzkých písmen, což 
dovolilo zmenšit rozsah generátoru 
znaků na polovinu a doplnit obrazy 
potřebných písmen české abecedy 
a rámečkových znaků v generátoru 
úzkých znaků a písmen české abecedy 
v generátoru širokých znaků. Dále byly 
obnoveny obrazy původních grafických 
znaků. 

Vkládání doplněných znaků z kláves- 
nice je řešeno dvojím způsobem. Pís- 
mena s diakritickými znaménky vyža- 
dují obdobný postup jako na psacím 
stroji, tedy nejprve zvolit znaménko, 
pak dopsat písmeno bez znaménka. 
Znaménko se volí jednou ze čtyř „ne- 
smyslných" kombinací kláves ENTER 
a SPACE a oběma klávesami SHIFT. 
Navolené znaménko se zobrazí na 
pozici kurzoru, který se neposunuje. 
Nyní je další vložený znak testován 
tabulkou písmen přípustných s tímto 
znaménkem. Je-li písmeno v tabulce 
obsaženo, generuje se kód písmene 
s diakritickým znaménkem, jinak se 
volba znaménka ruší a písmeno se do 
textu zaznamená beze změny. 

Kroužek na „ú“ se volí jako háček. 

Grafické znaky pro tabulky 
a rámečky s ostrými nebo kulatými 
rohy se generují v rozšířeném režimu 
TASWORDu po stisku kláves 1 až 8 sa- 
motných, nebo s klávesou SYMBOL 
SHIFT, celkem tedy 16 znaků. 

Texty pořizované původní českou 
verzí programu TASWORD nejsou po 
zavedení novou verzí čitelné. Proto byla 
vytvořena konverzní rutina, kterou lze 
vyvolat po funkcích LOAD/MERGE. 
Znaky odpovídající grafickým symbo- 
lům jsou změněny na příslušná písme- 
na české abecedy v kódu ASCII/Cs. 

V části programu TASWORD, psané 
v jazyku BASIC, byly provedeny rovněž 
některé úpravy. Po stisknutí „STOP" 
vystupuje strojový program do části 
BASIC a zobrazí se přehled možnosti. 
Jestliže si uživatel zvolí tisk textu, 
dotáže se program na rozteč řádků, 
číslo prvního a posledního tištěného 
řádku a způsob stránkování. Prázdná 
odpověď na poslední dotaz se považu- 


je za ANO, tedy stránkováni pilotní 
páskou formulářového zařízení DARO. 
Je-li zadáno N (NE), pak se nastaví 
inicializace počítáním řádků. Následuje 
poslední upozornění před tiskem, že 
má být nastaven začátek stránky. Pak 
je teprve provedena inicializace tisko- 
vého programu. Není-li tiskárna připra- 
vena k tisku, je na obrazovku vypsána 
zpráva a program čeká na ENTER. Pak 
se inicializace opakuje. 


Během tisku lze program přerušit dvo- 
jím způsobem. BREAK zastaví vlastní 
tiskový program; lze nulovat počitadla 
(klávesa I) a pokračovat (klávesa C). 
nebo jen pokračovat Zastavit tisk tímto 
způsobem nelze. K tomu je nutno 
podržet klávesu Q. Oba druhy přeruše- 
ní účinkují až po dotisknutí řádku; do té 
doby je nutno zvolenou klávesu 
(BREAK nebo Q) držet. 

Jednou z možností programu TAS- 
WORD je definice grafických znaků 
a kódů řídících funkci tiskárny. Po 
zvolení této funkce se zobrazí současná 
interpretace grafických znaků s kódy 
128 až 143. Každý z těchto znaků může 
být vyslán do tiskárny jako posloupnost 
až čtyř kódů pro vykonání některé řídicí 
funkce. Například změna barvy pro 
tiskový program se kóduje jako 18,1 
— červená, 18,0 — černá, nová stránka 
jako 12 (čísla jsou dekadická). 

Po ukončení těchto definic lze ještě 
zadat všeobecné řídicí kódy pro tisk. 
Nulová hodnota (kromě kódu 4) zna- 
mená, že kód se nevysílá. 

Kód 1 — použil by se u tiskáren, kde 
kódu řídicí funkce musí předcházet 
vždy stejný znak — ESCAPE. Tiskárny 
C21 1 1 , C21 1 2 jej nepoužívají. 

Kód 2 — kód zahájení tisku; pro 
tiskárnu Consul nemá význam. 

Kód 3 — kód ukončení tisku; pro 
tiskárny Consul nemá význam, 

Kód 4 — je to adresa inicializační rutiny 
tisku (dekadicky) — nesmí se změnit! 

Následující kódy se vysílají tiskárně na 
konci každého řádku: 
návrat vozu (CR) — pro obě tiskárny 
Consul a tiskový program zastupuje 
znak „nový řádek"; 

nový řádek (LF) — ponechat nulu (měl 
by význam pro dálnopis). 

Poslední údaj se týká odsazení tiště- 
ného textu doprava. Protože vyrov- 
návací paměť řádku v tiskovém progra- 
mu má kapacitu jen 80 znaků, řádek 
textu má 64 znaků, je možno uvést 
nejvýše 16. 

Úpravy moz a i k ových tiskáren 
C2111-03, C2112 

Tiskárnu Consul 2111-03 lze upravit 
pro tisk písmen české abecedy podle 
2N 21 /84b, jehož správcem je Doprav- 
ní podnik města Brna. Úprava je po- 
měrně složitá a předpokládá dodávku 
tiskací hlavy obsahující 11 magnetů 
a jehel od výrobce Zbrojovky Brno, 

k. p. Úprava představuje souhrn těchto 
dílčích operací: 

l. Výměna a nastavení nové tiskací 
hlavy. 




2. Doosazenf výkonových stupňů jehel , 
10 a 11. 

3. Doplněni desky ochran obvody pro 
jehly 10 a 11. 

4. Doplnění nezbytných ovíjených spojů 
v roštu. 

5. Výměna paměti PROM v generátoru 
znaků. 

Takto upravenou tiskárnu C21 1 1 -03 lze 
využívat jen programem TASWORD. 
Pro základní verzi tiskového programu 
a pro použití tisku programem VU-F1LE 
není úprava potřebná. 

Tiskárnu Consul 2112 lze upravit 
poměrně snadno. Pro tisk malých pís- 


men latinské abecedy stačí doplnit tři 
paměti PROM do desky generátoru 
znaků (deska 6-140.316, pozice 32 dle 
[2] — obvod 140.124, pozice 33 
— 140.125 a pozice 35 — 140.127). 
Tyto paměti jsou standardně osazo- 
vány do generátoru C2111. Dále je 
nutno změnit význam signálu SI-9, aby 
tiskárna nekontrolovala správnost při- 
jatých znaků paritou. Proto je nutno 
přepojit na desce 1 (vstupní obvody, viz 
[2]) propojku PR2 z polohy C do polohy 
D (výkres desky 140.201 popř. 
140.301). Po těchto úpravách není tisk 
ještě bezvadný, protože C2112 má jen 
8- jehlovou tiskací hlavu, takže spodní 
body písmen j, y, g, p a q se netisknou. 


Pro dokonalejší tisk by bylo nutno 
osadit 9-jehlovou tiskací hlavu (běžný 
náhradní díl) a postupovat obdobně 
jako při úpravě C21 11-03. 
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Výpis obslužného programu 


consul 211.1 - tisk 

, 2© *H consul 211.1 - tisk 

30 .Ekvivalence 
40 i 


FAC8 

50 Zac 

EGU 

64200 


SCC5 

60 PRruta 

EQU 

45CC5 

;adr . tisk . rutiny kanalu 1 

©9F4 

70 PR-0UT 

EQU 

•09F4 

. rut.pro klič. slova 

03B5 

80 BEEPER 

EQU 

4G3B5 

.piskaci rutina 

1F54 

90 BR-KEV 

EQU 

41F54 

. test na BREAK 


100 *fc 





110 ; Iniciál izacc programu 


120 . 




FAC8 

130 

ORG 

Zac 


FAC8 

140 las 

LD 

HL , indas 

. inic 

FACB 

15© 

LD 

<HL> ,401 

. aut.str. 

FACD 

160 

JR 

Init 

; prask ok 

FAD2 

170 

ORG 

Ias+10 


FAD2 

180 znr 

DEFB 

128 

.počet zn./rad. 

FAD3 

190 rds 

DEFB 

68 , 

počet radku/str. 

FAD4 

200 rdp 

DEFB 

4 

. počet radku pres prekiyb 

FAFA 

210 

ORG 

Ias+5© 



220 *E 




FAFA 

23© Ips 

LD 

HL, indas 

. inic stránkováni 

FAFD 

240 

LD 

(ML >,#©2 

.pilotní paskou 

FAFF 

250 

JR 

Init 

. — > 

FB2C 

260 

ORG 

Ias+10© 



270 *E 




FB2C 

280 Irs 

LD 

HL , i ndas 

. inic . rucniho 

FB2F 

290 

LD 

(HL) ,400 

.stránkováni 


300 *E 




FB31 

310 Init 

LD 

HL.Tisk ; 

zamena adr 

FB34 

320 

LD 

(PRruta) - 

HL . PKINT- rutiny kanalu 

FB37 

330 

LD 

HL , zr.po C 

.nastav. 

FB3A 

340 

LD 

A, 401 ,1 

znak na radku 

FB3C 

35© 

LD 

(HL) ,A 


FB3D 

360 

INC 

HL 


FB3E 

370 

INC 

HL 


FB3F 

380 

LD 

(HL).A . l.radek na strancs 

FB40 

39© 

DEC 

HL 


FB41 

400 

LD 

A. (znr) . 

.počet zn/ rad 

FB44 

410 

INC 

A 

;+l 

FB43 

420 

LD 

(HL) .A 


FB46 

430 

INC 

HL 


FB47 

44© 

INC 

HL 


FB48 

45© 

LD 

A, (rds) . 

.počet rad/str 

FB4B 

460 

INC 

A 

.+1 

FB4C 

47© 

LD 

(HL) .A 


FB40 

48© 

LD 

HL.Buf 

; init pozici 

FB5© 

49© 

LD 

(pozbuf ) , 

.HL .v buf faru 

FB33 

500 

LD 

(póza) .HL .pozic* rMMztry * 1 

FB56 

510 

LD 

HL.typCon . A(typ C211z> 

FB39 

32© 

SUB 

A 


FB5A 

530 

CP 

(HL) .určen ? 

FB5B 

54© 

RET 

NZ . ano . . 

FB5C 

550 tonl 

IN 

A, (409) 

.cti 

FB5E 

560 

BIT 

6, A 

.plati ? 

FB60 

570 

JR 

Z, tonl 

.ne 

FB62 

58© 

BIT 

l.A 


FB64 

590 

JR 

Z, onlins 


FB66 

600 

PUSH 

HL 


FB67 

610 

LD 

HL , 403E3 


FB6A 

620 

LD 

DE, 40258 


FB6D 

630 

CALL 

BEEPER 

.zvuk 

FB70 

640 

CALL 

BR—KEY 

.test BREAK 

C B73' 

650 

POP 

HL 


FB74 

660 

JR 

C. tonl 

.ne 

FB76 

670 

RET 



FB77 

680 onlins 

Dl 



FB78 

690 

LD 

B.4 


FB7A 

700 cykm 

LD 

A, 420 íMZtra 

FB7C 

710 

CALL 

T iskzn 


FB7F 

720 

DJNZ 

cykm 

;4 x 

C B81 

730 

LD 

B.2 


C B33 

740 cyknv 

LD 

A/#OD ;navrat vozíku 


750 

CALL 

T iskzn 


C B89 

740 

DJNZ 

cykrrv 

,2 x 

FB8A 

770 

LD 

3.12 


FB3C 

780 vr.c 

PUSH 

BC i 12 

x 200 

3880 

790 

LD 

B.20O 


reqr 

800 

DJNZ 

'* i poci 

kej 

F991 

310 

PCP 

EC 



70 
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FB92 

820 


DJNZ 

vne 

cp94 

S30 

Rtest 

IN 

A, i 409! 

FB96 

340 


217 

6. A .platí 

FP98 

850 


Jfř 

Z. řt test , ne 

PR9A 

860 


BIT 

7, A , .eady T 

FP9C 

370 


JR 

Z, jeto 11 , .té 

FB9E 

880 


LD 

A, 2 .02112 

EBAO 

890 


JR 

Cspol 

C 8A2 

900 

jeteli 

LD 

A, 1 .02111 

FBA4 

910 

Cspol 

LD 

(HL).A .ulož 

C 8A5 

920 


El 


C BA6 

930 


R£T 

, navrat 


940 

*c 




950 

; Proir.er 

■re 



960 




F8A7 

970 

z řípo c 

Der B 

402 .počitadlo znaku na racku 

FBAS 

980 

zr •'ad 

DEFB 

400 .počet znaKU na radku * 1 

F9A9 

990 

radpoc 

DEFB 

400 .p.ocitaJlo .acku na str. 

F9AA 

1000 

radstr 

DEró 

400 .počet racku na sir. 

C BAB 

1010 

pozTAB 

DEr £ 

490 .nova pozice TAě 

FBAC 

1029 

indas 

DEFB 

400 .aut .sír aivovam - 1 

FBAD 

1030 

typCon 

DEFB 

400 .typ C211x 

FBAE 

1040 

pozbuf 

DEFW 

0 .pozice v ouffsru 

FBBO 

1050 

pozm 

DEFW 

0 .pozice posi nemez*ryrl 


1060 

*E 




1070 

.Hlavni p.-oci. an. 


1080 

. 



FBB2 

1090 

Tisk 

LD 

HL. IGN 

FBB5 

1100 


DEC 

(HL> .ignoroval ? 

FBB6 

1110 


RET 

NZ , ano 

FBB7 

1120 


INC 

(HL) 

=■868 

1130 


LD 

HL, typCon 

FBBB 

1149 


LD 

C , ( ,-iL ) . i d . Consu 1 u 

FBBC 

1150 


CP 

4A5 , k i i c . siovo ? 

FBBE 

1160 


•JP 

NC , PR_0UT .ano.. 

FBC1 

1170 


CP 

430 .znaky 430-4A4 ? 

FBC3 

1180 


JR 

NC , ;<S0_A4 , ano . . 

FBC5 

1190 


CP 

420 ítiskiíutelne ? 

FBC? 

12O0 


JR 

NC.TiZri .ano . . 

FBC9 

1210 


CP 

406 .carka v PRINl ? 

FBCB 

1220 


JP 

Z.PrCom .ano. . 

FBCE 

1230 


CP 

409 .posun zpět 1 

FBDO 

1240 


JR 

2 . Kzpet , ano 

FBD2 

1250 


BIT 

l.C . C21 12 ? 

FBD4 

1260 


JR 

NZ , c2a . ano 

FBD6 

1270 


CP 

#06 . vert . taoelace ? 

FBD8 

1280 


JR 

Z.TiZn .ano 

FBDA 

1290 

c2a 

CP 

40C iPage? 

ií 

CD 

U. 

1300 


JP 

Z.Kpage ,ariO. . 

FBDF 

1310 


CP 

40D .ENTER ? 

FBE1 

1320 


JR 

Z, Kenter .ano.. 

FBE3 

1330 


CP 

410 .nepoužité kódy ? 

FBE5 

1340 


JR 

C, Knetis .ano. . 

FBE7 

1350 


BIT 

l.C , C2112 ? 

FBE9 

1360 


JR 

NZ , c2b . ano 

FBEB 

1370 


CP 

41B .ESC-zpet . radek? 

FBED 

1380 


JR 

Z , Ti Zri . ano 

FBEF 

1390 


CP 

412 ;< FLASH ? 

FBF1 

1400 


JP 

C.Atrl .ano. INK a PAPER 

FBF4 

1410 


CP 

415 .< OVER ? 

FBF6 

1420 


JP 

C, Atr2 .ano FLASH. BRIGHT, INVERSE 

FBF9 

1430 

c2b 

CP 

416 ;< AI ? 

FBFB 

1440 


JP 

C.Atrl .ano. OVER 

FBFE 

1450 


JP 

Z, AT . 16— AT 

FC01 

1460 


CP 

418 .< 413 ? 

FC03 

1470 


JP 

Z.TA6 .ano, . TA6 

FC06 

148© 

1490 

*E 

JR 

Knetis .nepoužité. . 

FC08 

1500 

Kenter 

LD 

HL.znpoc .ne... řádkuj a navrat 

FCOB 

151© 


JR 

Nrad 

FCOD 

152© 

Kzpet 

LD 

A, 408 .zpět 

FCOF 

1530 


BIT 

l.C .C21127 

FC11 

1540 


RET 

NZ .ano-> 

FC12 

1550 


JR 

TiZn ; — > 

FC14 

156© 

Knetis 

CP 

40© .NULL ? 

FC16 

1570 


RET 

Z .ano. . 

FC17 

1580 


i_D 

A.43F .otazník 

FC19 

1590 


JR 

T i Zr, , — ✓ 

FC1B 

1600 

K30-A4 

LD 

A.42E . teera 

FC1D 

1610 

T iZn 

CALL 

Dobufr , — > tisk 

FC20 

1620 


LD 

HL.znpoc 

FC23 

1630 


LD 

A, (HL) 

FC24 

1640 


INC 

A .zvyš poc.zn/rad 

FC25 

1650 


LD 

(HL) , A 

FC26 

1660 


INC 

HL 

FC27 

1670 


CP 

(Hl> .konec racku : 

FC2S 

1680 


RET 

NZ , ne . . . 

FC29 

169© 


DEC 

HL 



FC2A 

170G Nrad 

LD 

A/#01 ipoc . zn . : = 1 

FCBC 

2560 


JR 

PisAdr 

-obnov atr. 

FC2C 

1/10 

L0 

<HL> /A 


FCBE 

2570 

TA8 

LD 

HC <T_1 (adr.rout. 

FC2D 

1720 

INC 

r!L 

- 

FCC1 

2580 

PisAdr 

LD 

(Pftruta) . 

HL 

FC2E 

1730 

INC 

HL 


FCC4 

2590 


RET 

i — > 


FC2F 

1740 

LD 

A, (HL) 


FCC5 

2600 

T_1 

LD 

HL.Tisk 

- obnov adr . rout . 

FC30 

1730 

INC 

A - zvy* poc . rad/str . 

Fcce 

2610 


LD 

(PRruta). 

-HL 

FC31 

1760 

LD 

(HL) -A 


FCCB 

2620 


LD 

HL.IGN 

- ignoruj 

FC32 

17/0 

INC 

HL 


FCCE 

2630 


INC 

(HL) (1 znak 

FC33 

1780 

CP 

(HL) 

(konec stránky 7 

FCCF 

2640 


LD 

A. (pozTAB) (pozice TAB 

FC34 

1790 

JR 

Z-Nstr i. 

ano . . 

FCD2 

2650 


LD 

HL.znrad 


FC36 

1806 Řádkuj 

LD 

A.#0D 

(navrat vozu 

FCD5 

2660 


CP 

(HL) 

i TAB > konec radku ? 

FC38 

1810 

JP 

Dobuf r < 

— > tisk a navrat 

FCD6 

2670 


DEC 

HL 


FC3B 

1820 Nstr 

DEC 

HL 


FCD7 

2680 


JP 

NC -Nrad 

-ano .novy radek 

FC3C 

1830 

LD 

A. #01 

(poc . radku *1 

FCDA 

2690 


SUB 

(HL) (Odacti počitadlo zn/rad 

FC3E 

1840 

LD 

(HL) ,A 


FCDB 

270© 


LD 

B/A 


FC3F 

1850 

LD 

fcft. . 1 r*das 


FCDC 

2710 


JP 

P.Odeez 

- — > tisk eezer 

KC42 

1860 

CP 

(HL) 

; au t . s t r . ? 

FCDF 

272© 


RET 



FC43 

1870 

JR 

NZ- Dotaz 

(na . . . 

FCEO 

2730 

ION 

DEFB 

#01 


FC45 

1880 

LD 

A< < rdp) 

(radky na konci str. 


2740 

»E 




FC46 

1890 

LD 

8/ A 



275© 

(Tiskový podprograe 


FC49 

1900 

INC 

e 

(♦1 


2760 

i 




FC4A 

1910 Odradk 

LD 

A.#0D 

.navrat vozu 

FCE1 

2770 

T iskzn 

PUSH 

AF 

-ulož 

FC4C 

1920 

CALL 

Dobuf r 


FCE2 

2780 

Cl 

IN 

A/(#09> 


FC4F 

1930 

DJNZ 

Odradfc 

( cy« 1 

FCE4 

2790 


RLC 

A 


FC51 

1940 

RET 

(navrat 


FCE6 

2800 


JR 

NC .Cl ((cekej na READV) 

FC52 

195© Dotaz 

•JR 

C. Radku j 

(stránkuje pilot 

FCE8 

281© 


POP 

AF 


FC54 

196© 

PUSH 

BC 

(úklid 

FCE9 

2820 


OUT 

(#09). A 

-vystrč data na sb. 

FC55 

1970 

PUSH 

AF 


FCEB 

2830 


RET 



FC56 

1980 

LD 

HL - P01F4 

(zapiskni 


284© 

#£ 




FC59 

1990 

CALL Plip 

< — > 


2850 

( Uschová do buffaru 

a vyber 

FC3C 

2000 

POP 

AF ; 

obnova 


2860 

i 




FC50 

2010 

POP 

BC 


FCEC 

2870 

Dobuf r 

PUSH 

HL 


FC5E 

2020 

JR 

Řádkuj > 

radak a pokračuj 

FCED 

2880 


LD 

HL>(pozbuf) (ukazatel 

FC66 

2030 PrCoe 

LD 

HL.znpoc 

(pozice znaku 

FCFO 

2890 


LD 

(HL) /A 

-ulož znak 

FC63 

2640 

LD 

A. (HL ) 


FCF 1 

2900 


INC 

HL 

-dalsi 

FC64 

2050 

DEC 

A i - 1 


FCF2 

2910 


LD 

(po zbuf) . 

.HL 

FC65 

2060 

AND 

•FO i 

nastav na další 

FCF5 

2920 


CP 

•OD 

-Carridge Return 7 

FC67 

2070 

ADO 

A, #11 / 

šestnáctku 

FCF7 

2930 


JR 

Z/Tbuf 

(ano. . tisk buf . 

FC69 

2080 

INC 

HL 


FCF9 

2940 


CP 

•20 

-eezera ? 

FC6A 

2O90 

CP 

(HL) 

(konec radku 7 

FCFB 

295© 


JR 

Z/PopRet 

(ano. .přeskok 

FC68 

210© 

DEC 

HL 


FCFD 

296© 


LD 

(póze) /HL (za neeez.zn. 

FC6C 

2110 

JR 

Z. Nrad 

(ano. . 

FDOG 

297© PopRat 

POP 

HL 


FC6E 

212© 

SUB 

(HL) 


FD01 

298© 


RET 

(navrat 


FC6F 

2Í3© 

LD 

8. A 

(ne... tiskni eezery 

FD02 

2990 

Tbuf 

LD 

HL / ( póze ) 

FC70 

2146 Odnez 

LD 

A. #20 


FD05 

300© 


LD 

A,#OA 


FC72 

2150 

CALL 

TiZn 


FD07 

3010 


LO 

(HL) .A 


FC7S 

2160 

DJNZ 

Odaaz 

(cykl 

FD08 

302© 


INC 

HL 


FC77 

2170 

RET 

;« navrat 

FD©9 

3030 


LD 

A,#OD 


FC78 2180 Kpage 

LD 

HL.znpoc 

ipoc .zn/ rad 

FD08 

3040 


LD 

(HL) .A 


FC7B 

2190 

LD 

A/ (HL) 


FDOC 

3050 


LD 

HL.Buf 

(init ukazatel 

FC7C 

2200 

DEC 

A iinizit 

FDOF 

3060 

Zbuf 

LD 

A. (HL) 

(ber znak 

FC7D 

2210 

JR 

Z.Zacrad 

1 (je-li ©/ přeskok 

FD1© 

3070 Zbufl 

CALL 

Tiskzn 

disk 

FC7F 

2220 

CALL 

Nrad (jinak novy radak 

FÓil 

3060 


INC 

HL 

-dalsi 

FC82 

2230 Zmerm d LD 

HL. ra<E>oc (poc . rad/str . 

FD14 

3090 


CP 

#©A 

(konec buf 7 

FC85 

224© 

CD 

8/ (HL) 


FD 16 

3100 


JR 

NZ/Zbuf 

(ne. . . 

FC8* 223© 

LD 

A, #01 


FD18 

3110 


LD 

A/ (HL) 

-n . v . po n.r.7 

FC88 

226© 

LD 

(HL) ,A 


FD19 

312© 


CP 

#0D 


FC89 

2270 

PUSH 

HL 


FD1B 

3130 


JR 

NZ/Zbuf 1 

-ne 

FC3A 

228© 

LD 

HL. indas 

FD1D 

314© 


LD 

HL/typCon 

FC8D 

2290 

CP 

(HL) 

pilot stránkuje ? 

FD20 

315© 


BIT 

l/UE.) 

(C2112 7 

FC8E 

2300 

POP 

HL 


FD22 

3160 


CALL 

Z/Tisk zn 

(nrd 

FC3F 

2310 

JR 

NC. Napil 

(ne 

FD25 

317© 


LD 

HL-8uf 

( initadr .buff . 

FC91 

2320 

LD 

A,#0C 


FD28 

3180 


LD 

(pozbuf ) 

-HL 

FC93 

2330 

JR 

Tiskzn 

(nova stranka 

FD2B 

3190 


LD 

(póze) -HL 

FC95 

234© Napil 

LD 

A,B 


FD2E 

3200 


POP 

HL 


FC96 

235© 

DEC 

A (snížit 

FD2F 

3210 


CALL 

8R-KEV ; 

test BREAK 

FC9? 

236© 

RET 

Z ; je-1 i 

O. konec 

FD32 

3220 


RET 

C -navrat- když neni 

FC98 

2370 

INC 

A 


FD33 

3230 


LD 

HL,#03E8 

-par . tonu 

FC99 

238© 

INC 

HL 


FD36 

3240 

Piip 

LD 

DE/«02S8 


FC9A 

2390 

SUB 

(HL) í 

počet radku do 

FD39 

3250 


CALL 

6EEPER -piskne 

FC9B 

2400 

CPL 

(kooca str. 

FD3C 

326© 

TestZC 

LO 

A,«F£ 


FC9C 

2410 

LD 

B/A 


FD3E 

3270 


IN 

A,(#FE) 

(cti CAPS— >V 

FC9D 

2420 

CALL 

Odradk ; 

do konce str. 

FD40 

328© 


BIT 

1/A 

(Stisknuto “Z" ? 

FCAG 

2430 

JR 

Nstr 


FD42 

329© 


JR 

Z -ErRest 

-ano. . 

FCA2 

244© Atrl 

LD 

HL/IGN 

( ignoruj 

FD44 

330© 


BIT 

3, A 

-stisknuto "C“ 7 

FCA5 

2450 

INC 

(HL) ( 

další B ignoruj 

FD46 

331© 


RET 

Z /ano. .navrat 

FCA6 

2460 

RET 

(navrat 


FD47 

3320 


LD 

A,#0F 

-cti P. .Y 

FCA7 

2470 AT 

LD 

HL/IGN ( 

ignoruj 26 

FD49 

3330 


IN 

A-(#FE) 


FCAA 

2480 

LD 

(HLÍ-3 í 

vynech 2 B 

FD48 

3340 


BIT 

2. A 

-je stisknuto “I" ? 

FCAC 

2490 

RET 

(navrat 


FD4D 

335© 


CALL 

Z- lni t 

-ano . . init 

FCAD 

2500 Atr2 

LD 

HL/Atr2R (adr.rut.pro barvu 

FD50 

336© 


JR 

TestZC 

(C ani Z - cykl 

FCBO 

2510 

JR 

PisAdr ; 

nastav 

FD52 

3370 

ErRest 

RST 

8 

íerror restart 

FCB2 

252© Atr2R 

NEC 

(carny nebo 

FD53 

338© 


DEFB 

#0C 

-chyba BREAK - 1 

FCB4 

233© 

ADD 

A, #12 .car vany tisk 

FD54 

3390 


RET 

-navrat 


FCB6 

2540 

CALL 

Dobuf r 

- nastav 

FD55 

3400 

Buf 

EQU 

X 


FCB9 

255© 

LD 

HL.Tisk 










Vladimír Vyhfták 


Každý mikropočítač potřebuje jednotku zobrazen í. Většinou je snaha použít 
affanumericfcý displej využívající televizní obrazovku. Že to není řešeni vidy 
optimální, mohou potvrdit mnozí majHeié počítačů ZX-81 a Spectrum, kteří 
potřebovali někdy využít svého počítače v místě, kde nebyl k dispozici televizní 
přijímač. Proto vznikl tento mikr o t e r mi nál, který zobrazuje data pomocí 
sedmisegmentového displeje. 

Mikroterminál byl řečen s ohledem nejdříve základní část s minimální 

na co možná největší jednoduchost paměti a teprve později doplnit další 

a možnost připojení jak k mikropo- paměť a televizní alfanumerický di- 

čftačům ZX-81 a Spectrum, tak splej. Pro vyzkoušení a jednoduché 

k jednoduchým amatérským mikropo- aplikace oné první části se velmi dobře 

čítačům na bázi MHB8060A. Při stavbě hodí tento mikroterminál. Může být 

amatérského počítače je výhodné oživit řešen jako samostatná jednotka. 


případně spojen v jeden celek s mikro- 
počítačem Intelka popsaným v AR 
B1/83. Popis signálů sběrnice souhlasí 
s tímto mikropočítačem. Bez problému 
je však možné mikroterminál připojit 
k JPR-1, JMP-80 nebo jiným. JMP-80 
je amatérský mikropočítač, který vznikl 
na zákiadě zkušeností s různými typy 
počítačů. JPR-1 není totiž pro amatér- 
ské použití přiliš vhodný zejména pro- 
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Obr. 1. Schéma mikroterminálu MT-80 






















Obr. 2. 

Obrazec plošných 
spojů na desce 
membránové klávesnice 
W509 mikroterminéJu 
MT-80 


Seznam součástek 


lOI, 102 

MH3212 

103 

MH74188 

104 

MH7442 

105 

MH7400 

106 

MH7420 

107 

74123 

108 

MH7404 

109 

MH7400 

1010 

MH3205 

St až S8 

LQ400 

TI až T8 

KF517 

R1 

1 kO, TRI 61 

R2 až R5 

1.5 kil TR161 

R6 
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R7, R8 

10 kil TRI 61 

R9 až R16 
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D 

1 

2 

3 

i 

l 

r 

HpĚ 

Dpi 

m 

4 » 

m 


1 

O 

i!i iii 

n 7 



R 



íiMiumiuif 


r 

■i 

3 

c 

i 

)=SS 

y 


i 


1! 

RE 

ilE 

Gl M 

wm 

EM EXEC 

H 

■ 

- 

lima 

m 

■■ 


rn 

i 



130 
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to, že vyžaduje použití desky plošných 
spojů vysoké přesnosti nejlépe s pro- 
kovenými dírami. Intelka je naopak 
nevýhodná v tom, že pro vytvoření 
minimálního uspořádání mikropočítače 
jsou nutné nejméně dvě desky: základ- 
ní jednotka a paměti. JMP-80 je na 
desce rozměru 170 x 270 mm zhotove- 
né v běžné třídě přesnosti a na základní 
desce obsahuje základní jednotku, pa- 
měť EPROM 4 kB a RAM 4 kB i obvody 
vstupu i výstupu. Sběrnice je podobná 
jako u Intelky, avšak využívá konektory 
FRB. Myslím, že po obsáhlém článku 
v AR B1 a B2/83 nemá smysl tento 
počítač blíže popisovat. Případným 
zájemcům předlohu pro výrobu ploš- 
ného spoje zapůjčím. 

Nyní zpět k mikroterminálu. Schéma 
zapojení je na obr. 1. Skládá se 
z obvodů klávesnice, obvodu displeje 
a obvodu adresování. Adresu mikroter- 
minálu je možné v určité oblasti volit 
vhodným zapojením drátových propo- 
jek do adresového pole. Takto volíme 
skupiny po osmi adresách. Výslednou 
jedinou adresu volíme propojkou na 
výstupech 1010. Volba adres propoj- 
kou je uvedena v tab. 1. Obvody 109 
a 10 lze vynechat a mikroterminál 
adresovat přímo ze systému signálem 
Výběr na špičce konektoru č. 2. 
K oddělení vstupu a výstupu 
od datových sběmic systému 
a výstupu od datových sběrnic systému 
slouží lOI a 102. Signál z datové 
sběrnice za 102 se dekóduje na seg- 


Tab. 1. 


oktet 

A 

B 

C 

O 

E 

F 

G 

13 

3 

1 

5 

6 

2 

4 

7 

14 

1 

4 

5 

6 

2 

3 

7 

15 

3 

4 

5 

6 

2 

— 

7 

19 

3 

4 

2 

6 

7 

— 

5 

21 

3 

1 

5 

2 

7 

4 

6 

22 

1 

4 

5 

2 

7 

3 

6 

23 

3 

4 

5 

2 

7 

— 

6 

25 

3 

1 

2 

6 

7 

5 

4 

26 

1 

4 

2 

6 

7 

5 

3 

27 

3 

4 

2 

6 

7 

— 

5 

28 

1 

2 

5 

6 

7 

4 

3 

29 

3 

2 

5 

6 

7 

— 

4 

30 

1 

4 

5 

6 

7 

3 

— 

31 

3 

4 

5 

6 

7 

— 

— 


menty a pozice v dekodérech 103 
a 104. 103 je třeba naprogramovat 
podle požadavků na tvar zobrazova- 
ných znaků. Je možné zobrazit nejen 
číslice, ale i některé jednoduché znaky. 
Pro segmenty, které mají svítit, je třeba 
naprogramovat do MH74188 hodnotu 
L. Výstupy 104 určují pozici segmento- 
vého zobrazovače, na které je právě 
zobrazovaná sestava segmentů. Displej 
pracuje v multiplexním režimu. Logická 
nula, která cyklicky spíná jednotlivé 
pozice displeje^ je využita i pro klávesni- 
ci. Signály klávesnice jsou kódovány 
tak, že výstup pro tlačítka 0 až F je 
přímo v kódu BCD. Bit D5 charakterizu- 
je zbývající čtyři funkční tlačítka. Hod- 
notu bitů D6 a D7 je možné navolit 
pomocí obvodů RS z 108. Logická 
jednotka na 08 charakterizuje platná 


data. Po špatných zkušenostech 
s klávesnicí PMI-80 byl vliv zákmitů 
tlačítek odstraněn technickými 
prostředky přímo v mikroterminálu. 
Data se do mikropočítače čtou až po 
ustálení stavu tlačítek. Klávesnice je 
membránová, podobná jakou má mik- 
ropočítač JPR. Postup výroby je po- 
psán v AR B2/83. 


Několik poznámek ke konstrukci 


Mikroterminál je na desče s plošnými 
spoji o rozměru 170 x 130 mm. Těsně 
nad touto deskou je pomocí rozpěrek 
upevněna sestavená membránová 
klávesnice, která je propojena se zá- 
kladní deskou drátovými propojkami. 
K mikropočítači se připojuje mikroter- 
minái přes konektor s propojovacím 
kabelem. Segmentovky je vhodné 
umístit do objímky, aby se dostaly do 
úrovně klávesnice. Rezistory R2 a R5 
jsou buď na opačné straně plošného 
spoje nebo nad 106. Zapojení samo 
v sobě neskrývá žádné záludnosti. 
S vhodným programem pracuje podle 
požadavků uživatele. 
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Prispevok je určený pre užívatePov mikropočitačov neobsahujúctch přerušo- 
vací systém popr. časovač a hlavně pre záujemcov, fctori nemajú možnosť 
zaobstaraf sl obvody MH3214, MH3212 a 18253, používané pre tento účel 
v priemyselne vyrábaných syst émo c h . V predkladanom riešeni sú použité 
dostupné integrované obvody TTL mátej íntegrácte a čítače MH741 93 (74192). 
Ríešenie představuje rozširenie možného jednoúrovňového prerušovania na 
vlacúrovftový přerušovací systém a ďalej obsahuje jeden 8bitový časovač, 
pričom výstup časovača zároveň tvoří jednu prerušovaciu úroveň. Zapojenie 
umožňuje rozširiť funkciu mikropočftača pre rladenie v reálnom čase 
a realizovat* časovacie funkcie bez použitia programových časovačích slučiek. 
Aj ketf je možné rieienle využif všeobecnejšie, ovládacie signály a funkcie sú 
popfsané k použitiu so školským mikropo čH ačom PMI 80. 


Popis obvodového riešenia pre- 
rušovacieho systému 


Návrh obvodového riešenia prerušo- 
vacieho systému předpokládá existen- 
ci u jednoúrovňového prerušovacieho 
systému v mikropočítači. Hardwarovo 
je táto možnosť zabezpečená tým, že 
výstup INTA systémového budiča 8228 
je cez rezistor 1 kn připojený na na- 
pátie +12 V. Po přijatí požiadavky na 
prerušenie cez vstup INT mikroproce- 
sora 8080, generuje obvod 8228 kód 
prerušenia RST 7, následkom čoho 
mikroprocesor vykoná skok na adresu 
38 H s uložením návratovej adresy do 
zásobníka. Od adresy 38 H je v buň- 
kách památi (váčšinou ROM) uložená 
inštrukcia skoku na buňku v památi 
RAM situované v oblasti zásobníka. Na 
buňky od tejto adresy vkládá uživateT 
inštrukciu ďatšieho skoku na adresu, 
kde začína vlastný obslužný program 
prerušenia. 

Obvodové riešenie prerušovacieho 
systému představuje rozširenie na 
štvorúrovňový systém, umožňujúci roz- 
lišit a spracovať požiadavky na preru- 
šenie: INTR 1 až INTR 4. štvorúrovňový 
systém bol zvolený s ohfadom na 
předpokládané praktické potřebu, 
princip umožňuje jednoduchým spóso- 
bom rozširenie až na osemúrovňový 
systém, prirodzene s váčším počtom 
potřebných obvodov. Žiadosti o pre- 
rušenie INTR 1 a INTR 2 sa privádzajú 
z riadeného objektu na hodinové 
vstupy D klopného obvodu lOI. Klopný 
obvod sléži ako pamáť žiadosti. Zápis 
žiadosti sa uskutočňuje pri zmene 
zLdoH úrovně signálu žiadosti. Zápis 
žiadosti je možné blokovať pomocou 
D vstupov lOI, vtedy je potřebné, aby 
blokovacie signály DII a DI2 mali 
úroveň L. Riadenie úrovně týchto vstu- 
pov a tým akceptovanie popr. zákaz 
žiadosti je možné zabezpečit ich spoje- 
ním s výstupmi brán obvodu 8255 
ovládaných programom. Ďalšia preru- 
šovacia úroveň je odvod ená od činnosti 
časovača. Po ukončeni časovače] akti- 
vity je výstupným signálom z čitača 
překlopený D klopný obvod 107/B, 
z ktorého výstupu je odoberaný signál 



žiadosti o prerušenie INTR 3. Pomocou 
vstupu Dl 3 nastaveného na úroveň L je 
možné blokovat zápis tejto žiadosti. 
Posiednou prerušovacou úrovňou je 
žiadost INTR 4, nevyžadujúca přídavné 
pamáť. Generován ia žiadosti ako aj jej 
kvitovanie popr. zákaz je zabezpečené 
jednou z brán obvodu 8255 pracuj úcej 
v móde 1 popr. 2 (strobovaný vstup- 
výstup) a pomocou riadiacich signálov 
brány C tohto obvodu. Signály žiadosti 
na prerušenie zapisané v památi a trva- 
júce až do ich kvitovania, sa logicky 
sčitajú pomocou obvodu 102. Výsledný 
signál, tj. žiadost o prerušenia INT 
s aktívnou úrovňou L, je přivedený na 
systémový vstup INTex mikropořitača 
PMI 80 alebo po jeho invertovaní pria- 
mo na vstup INT mikroprocesora 8080 
v iných systémoch. 

Pretože sa jedná o rozširenie jedno- 
úrovňového systému, je potřebné za- 
bezpečit rozlíšenie jednotlivých přeru- 
šovacích úrovni. Rozlíšenie je zabez- 
pečené vykonáním operácie vstupu 
(inštrukciou IN port) zo zvláštneho 
portu. Tento port generuje kód podra 
aktivovaných přerušovacích úrovní a 
tvoři ho obvod 104. Na vstupy 104 sú 
přivedené zapamátané žiadosti o pre- 
rušenie, výstupy 104 sú spojené s 
linkami DBO až DB4 dátovej zbernice 
„vytiahnutými" pre účel čítania cez 
rezistory 22 kQ na úroveň H. Pri in- 
štrukcii čitania je aktivovaný adresový 
bit A7. Priradenim jednotlivých úrovní 
k linkám DBO až DB4 a tvarom krátké- 
ho rozlišovacieho programu je stano- 
vená priorita přerušovacích úrovní. Při- 
klad jednoduchého rozlišovacieho pro- 
gramu je uvedený v ďalšej častí. Podfa 
tohto zapojenia a programu je priorita 
přerušovacích úrovni nasledovná: 
INTR 4 (najvyššia priorita), INTR 3, 

INTR 2, INTRt. Případ, že program 
neidentifikuje ani jednu úroveň, zna- 
mená poruchové činnost (popř. stlače- 
nie tlačítka INT v mikropočítači PMI 80, 
čo možno využit ako ďalšiu prerušova- 
ciu úroveň). Vzhradom na obvodové 
jednoduchost „kódera" priorit a identi- 
fikačný program je potřebné otázku 
priorit prerušenia upřesnit následovně. 
Uvádzaná priorita úrovní sa realizuje 
v okamžiku výskytu zapamátaných žia- 
dostí, obsluhovaná začína byť najvyššia 
priorita. Ak v obslužnom programe 
tejto úrovně kvitujeme (zrušíme) túto 
žiadost a povolíme prerušenie ínštruk- 


ciou El, je vyvolané nové prerušenie 
s obslužným programom najvyšej prio- 
rity zo zostávajúcich požiadaviek. Takto 
je možné přerušit aj vyššiu úroveň 
nižšou, ak to v obslužných programoch 
připustíme. Kvitovanie (zrušenie) žia- 
dosti o prerušenie je generované pro- 
gramovo, konkrétné inštrukciou výstu- 
pu (OUT port) do portu památi žiadosti. 
Táto inštrukcia bývá v tele obslužného 
programu tejto žiadosti. Žiadost INTR 1 
je zrušená vykonáním inštrukcie OUT 
do portu tvořeného lOI/A, pričom je 
aktívny adresovací bit A5. Obdobné je 
kvitovaná žiadost INTR 2, nulovaný je 
obvod tOl/B a aktivovaný je adresova- 
cí bit A6. Na obsahu registra A pri 
vykonávaní inštrukcie OUT v oboch 
prípadoch nezáleží. Kvitovanie žiadosti 
INTR 3 je zabezpečené vykonáním in- 
štrukcie OUT do portu tvořeného 
107/B, aktivovaný je adresovací bit A7, 
akumulátor mupí mať pri vykonáváni 
inštrukcie nuiovú hodnotu. Táto požia- 
davka vyplývá zo súčasného využívania 
bitu A7 pre časovač. Kvitovanie žiadosti 
INTR 4 prebieha podfa pravidiel komu- 
nikácie s obvodmi 8255. Použitie adre- 
sovacích bitov A5, A6, A7 vychádza 
z použitia principu lineárnej seiekcie 
v adresováni portov a zo skutočnosti, 
že tieto bity sú v mikropočítači PMI 80 
voíné. Po doplnění základnej verzie 
PMI 80 o užívatefský obvod 8255 
a obvodov podra tohto článku zostáva 
užřvaterovi k dispozici! vofný adresova- 
cí bit A4 a adresovacie bity A5, A6 
možno použit pre vstupné porty. Úplný 
kód adries portov móže byt ovplyvnený 
připojením iných portov 1/0. Jeho 
stanovenie ponecháme užívaterovi po- 
dobné ako aj pridelenie iných priorit 
přerušeni podfa apiikácie mikropo- 
čítača a povahy riadeného objektu. 

Poznámka k nevyužívaniu niektorých 
úrovní: nevyužívané žiadosti — vstupy 
INTR 1 INTR 2 a INTR 3 a ich 
blokovacie vstupy DII a DI2 netřeba 
ošetřovat. Ak sa nevyužívá úroveň 
INTR 3 ale je využívaná časovacia 
funkcia, je potřebné vstupu DI3 přiřadit 
úroveň L. 


Rozlišovací program a příklad 
obslužného programu. 


Spósob vyvotania rozlišovacieho 
programu ako aj stanovenie priorit 
úrovní bolo popísané v predchádza- 
júcej časti. Program je zapísaný 
v mnemokóde MHB8080 a so symbo- 
lickými adresami. 



* Uloženie obsahu registra A a příznakového registra do 
zásobníka z důvodu využívania týchto registrov 
v roziišovacom programe. Inštrukcia spatného vyzdvih- 
nula ich obsahu POP PSW je obsiahnutá v každém 
podprograme žiadosti prerušenia. 



Obr. 1. Přerušovací systém a časovač 
mikropo&tača 


Popis obvodového riešenia 
časovača 

Časovač umožňuje generovat jednu 
časovú aktivitu nezávisle od činnosti 
CPJ (po začatí čítania vyvolanom CPJ). 
Jedná sa v podstatě o Sbítový čítač 
zapojený ako vratný s možnost ou na- 
stavenía začiatočnej hodnoty a postup- 
ným odpočítáváním vonkajších hodino- 
vých impulzov až do nulovej hodnoty 
čítača, kedy sa končí časovacia aktivita 
a móže byt vyvolané prerušenie čin- 
nosti CPJ. Časovač pozostáva z dvoch 
4 bitových čítačov MH74193 (alebo 
MH74192), vzájomne spojených na 
8 bitový vratný čítač a riadiacich obvo- 
dov. Na nastavovacie vstupy A, B, C, 
O čítačov sú připojené linky DBO až 
DB7 datovej zbernice. Zápis požadova- 
né] počiatočnej hodnoty času (počtu 
impulzov) je zabezpečený vykonáním 
inštrukcie OUT do portu čítačov, pri- 
čom je aktivovaný adresovací bit A7. 
V případe použitia čítačov 74193 sa 
jedná o osembitový dvojkový čítač, pri 
použití čítačov 74192 o dvojstupňový 
dekadický čítač (do obvodu desiatko- 
vého rádu 109 sa potom ukládá počet 
desiatok). Rozsah počítania dvojko- 
vého čítača činí: 1 až 255 impulzov, 
desiatkového: 1 až 165 impulzov (je 
možné nastavif 15 desiatok). 


Pamáf ukončenia časovacej aktivity 
tvoří D klopný obvod 107/B, z jeho 
výstupu sa odoberá signál prerušova- 
cej úrovně INTR 3. D klopný obvod 
107/A a hradlá 106, 102 slúžia pre 
blokovanie počítania a synchronizáciu 
započítania prvého impulzu. Hradlá 102 
spolu s diodami Dl, D2 umožňujú 
systémové nulovanie (signálom ŘE- 
ŠET) ako aj funkčné nulovanie sek- 
venčných obvodov časovača. Z obvo- 
dov časovača je možné bezprostředné 
odoberaf časové priebehy TI, T2, T3. 
leh priebeh ako aj časová neurčitosf 
vyplývá z obr 2. Tieto výstupy sú 
aktivované po každom nastavení číta- 
ča, čo v niektorých aplikáciach nie je 
vhodné (napr. časovanie medzery me- 
dzi impulzami). Případné potlačen ie 
časovaných výstupov pomocou výstu- 
pov obvodu 8255 ponecháváme čita- 
tefovi. Pokiaf sa využívá iba jedna (neo- 
pakovaná) časovacia aktivita je pracov- 
ná rýchlosf obmedzená iba medznou 
frekvenciou obvodov časovača. Zloži- 
tejšie časové aktivity (opakované s ráz- 
nou dobou, popr. dlhé) sa realizuj ú 
programovo pomocou výstupných li- 
niek obvodu 8255 a preručenia vyvola- 
ného čítačom — INTR 3. Oblast gene- 
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rovanýeh časov je v tomto případe ob- 
med zená dobou spracovania ob- 
služného programu. 

Použítie Časovača doplňujeme v tom 
zmysle, že neumožňuje generovat sú- 
časne viac Sašových událostí, nie je 
možné prečítaf okamžitý stav SítaSa, 
p očitani e hodinových impulzov možno 
nahradit počítáním událostí z riade- 
ného objektu. Návrh obvodového rie- 
šenta generátor a hodinových impulzov 
CLOCK vzhfadom na rózne potřebné 
časy ponecháváme užfvaterovi. 

KonStrukčné rieěeme 

Ku konštrukčnému riešeniu obvodov 
prerušovacieho systému a časovača 
i ba niekofko poznámok. Uvedené 


cyklus časovača * N imp. 
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Obr. 2. časové priebehy 


obvodové riešenie možno realizovat na 
doske plošných spojov orientačně 
s rozmermi 150 x 80 mm. Pre osadenie 
obvodov podta obr. 1 spájkovacie pole 
základnej došky PMI 80 nepostačuje. 
Vhodné je vyrobit zvláštny modul 
a upevnit ho pomocou upevňovacích 
skrutiek a distančných stfpikov nad toto 
spájkovacie pole. Pre elektrické prepo- 
jenie je vhodné vystrojit modul malými 
dvorná až troma konektormi FRB. Je- 
den pre prepojenie so systémovým 
konektorom PMI 80-K1, druhý pre 
prepojenie s konektorom PMI 80 — K2 
a případný ďalší pre prepojenie 
s riadeným okolím. Napájacie napátie 
(+5 V) možno použit z PMI 80, kde pri 
použití napájača SN 080 je dostatočná 
rezerva v od bere. 



Ing. Miloslav Čapek 


Tiskárny jsou jednfm z nejpoužhranějšich periferních zařízení v mikropočftačo- 
výcb systémech. V mnoha případech [a vybaveni tiskárnou Kmitiijfcim faktorem 
pro použiti v praxi. Výbér táchto zařízeni nenf však na brdu nikterak běhal*. 
Jednou z možnosti v této oblasti je nákup relativné dostupné z a pisov a či jednotky 
Consut 256.9. Jedná aa v podstat* o e l e kt rick ý psacf strojmonf z e x terníh o 
zalfzeni pomoci matice ovládacfch magnetů. Mdfef elektroniku viak výrobce 
nedodává. Této funkci zabezpeči p ops aný systém. 


Jedním z úvodních požadavků bylo 
vystačit při realizaci s volnými IO vodiči 
portů desky JPR-t. Proto musely být 
výkonové spínače doplněny dekodéry. 
K ovládání tiskárny potom postačí 
jediný výstupní port (Port 20UT konek- 
toru X3). Bity 0 až 3 zde tvoří adresu 
sloupce, v němž leží spínaný magnet, 
bity 4 až 6 adresu řádku a bit 7 (ze 
ponechat pro ovládání dekodérů adres. 
Do volných bodů ovládací matice byly 
pomocí propojek a diod umístěny také 
ovládací magnety, oddělené na psacím 
stroji na konektorech K3 a K7. Ze 
zapisovači jednotky do počítače je 
snímána také zpětná stavová informa- 
ce. Nenf využito všech kontrolních 
funkcí, a proto postačí jen pět vstup- 
ních bitů. Nutným se ukázalo použít 
vstupní bity z konektoru X2 počítače, 
asice PORT 0 ÍN (pro připojenou 
klávesnici Consul 259.11) nebo PORT 
1 ÍN (pro připojenou klávesnici ANK-1). 
Obsadíme-fi vždy stejné bity, budou se 
obě řešení lišit pouze adresaci vstup- 
ního portu (tab. 1). Z uvedeného 
vyplývá, že koncovky obou kabelů 
náležejících konektorům X2 a X3 JPR-1 
je nutno kontrolními vodiči propojit To 
sice není příliš instalačně elegantní, ale 
je to jednoduché a úsporné. Stykový 
obvod je na dvou jednoduchých des- 
kách s plošnými spoji (zdroj 5 a 12 V 
a vlastní obvody), z technologických 
důvodů jednostranných s množstvím 
propojek. K desce logiky je přiveden 
jeden kabel ze SAPI-1 a tří kabely ze 
zapisovací jednotky. 

Jednoduché připojení je však třeba 
doplnit programem. Program 


Tab. 1. Adresováni podle použtté klávesnice 


Klávesnice 

Obsah na ádr.430E. 436D. 4389H 

ANK-1 

Consul 2S9.11 

28H 

24H 


Tab. 2. Doplňkové funkeo 



76 


mikroelektronika ’88 


Grafické schéma obslužného 
programu 


k ovládání tiskárny je napsán ve strojo- 
vém kódu a je zabudován do systému 
ZPS-2 tak, aby byfo možno používat 
tiskárnu béžnými příkazy BASIC 
(LLIST, PRINT#L, TAB, $PC). Zajišťuje 
překódování znaků z kódu ASCII na 
kód matice magnetů (podprogram 
CODE), zjistí polohu typového koše 
u požadovaného znaku a podte potřeby 
zajistí i přeřazení. Zafiaroečf také samot- 
né vyslání maku na PORT 2 s potřeb- 
nými časovými parametry (podprogramy 
VYSL a DĚLY). Před vysláním znaku 
kontroluje ukončení všech důležitých 
funkcí zapisovací jednotky (podprogra- 
mem ZNAK). K dekódováni používá 
program tabulku, obsahující kontrolní 
znaky a velká písmena. V případě, že je 
třeba i malých písmen, háčků a čárek, 
je možno tabulku jednoduše odzadu 
doplnit Programem lze ovládat také 
doplňkové funkce zapisovací jednotky 
a to volání CALL přes vstupy CTRL 
3 a CTRL 4 (tab. 2). Úvodní krátký 
program INSTL provede instalaci no- 
vého ovládacího programu tiskárny do 
systému. 

Program i s tabulkou znaků je kratší 
než 256 bajtů a vejde se do voiné 
oblastí paměti 4300H až 43FFH. To má 
velký význam, neboť obslužný program 
tiskárny bude možno nahrávat spo- 
lečně s Interpreterem BASIC. Lze ho 
ovšem uložit do libovolné oblasti pa- 
měti. Je ho třeba zapsat do příslušné 
oblasti podte výpisu programu bucř 
pomocí příkazu .S monitoru přímo, 
nebo je možno použít systému TOOL, 
zapsat zdrojový program přeložit ho 
a přesunout příkazem M na požadova- 
nou adresu. Podle výpisu obsahu pa- 
měti naplníme předepsanou oblast 
prvky dekódovací tabulky. Návěští 
T v programu se musí shodovat 
s adresou prvního z nich. U původního 
souboru BASIC je třeba dále změnit 
skok JMP 4407H na JMP 4300H. Skok 
leží na adrese 4400H. Takte připravený 
interpreter se nahraje příkazem .K.S 
z oblasti 430QH — 5FFFH. Nový BASIC 
je možno opět startovat p říkaz e m .B. 
Oproti dřívějšku přibývá pouze iniciali- 
zace .A-L=1 před spuštěním. 









Obr. 1. Schéma připojení tiskárny 
kSAPi-1 


Vzhledem k celkové koncepci pro- 
gramového vybavení ZPS-2 nelze uži- 
vatelskou tiskárnu použít pomocí 
CTRL-P a to v Monitoru vůbec a v soubo- 
ru BASIC a TOOL jen s velmi složitými 
a rozsáhlými úravami a zásahy do jejich 
struktury. Znak $ interpretuje 
tiskárna jako „Kčs" (jednotypové). 
V programu nebyly dodrženy nékteré 
doporučené časové parametry ovláda- 
né tiskárny. Budicí impulsy typových 
pák bylo možno zkrátit a tím snížit 
příslušnou razanci úhozů, celková rych- 
lost psáni byla upravena na 1 1 znaků/s 
(bez přeřazeno. Relativní pomalost tak- 
to vzniklého zařízení je však vyvážena 


velmi dobrou kvalitou tisku. Technické 
i programové prostředky by bylo 
možno ještě mírně zjednodušit využitím 
vlastností rozmístění magnetů v matici 
zapisovací jednotky (podle kódu 
ASCII). Úpravou však vyvstanou jiné 
problémy k řešení, takže původní kon- 
cepce vychází technicky čistší a pře- 
hlednější. 
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(1] Smutný, Systém JPR-1. AR 
81,2/1 983. 

(2] Uživatelská dokumentace a progr. 
vybavení SAPI-1, ZPS-2. 

(3] Švecové, Af.; Kódově nezávislý psa- 
cí stroj řízený mikroprocesorem. 
Automatizační technika 2/1981. 
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MEMORY ASSEMBLER MC3-8 

PAG01 


4334 11 

00 90 


LXI 

D, MSI 50 






4337 CD 

94 43 


CALL 

DĚLY 






433A 06 

16 


MVI 

B,16H 



IODEF 

EQU 

1 1EH 

433C 79 



MOV 

a)c 



PORTO 

EQU 

24H 

433D 11 

C2 08 

Til: 

LXI 

D.MS30 



PORT1 

EQU 

28H 

4340 CD 9D 43 

TI2: 

CALL 

ZNAK 



PORT 2 

EQU 

2CH 

4343 50 



MOV 

D,B 



MS30 

EQU 

8C2H 

4344 CD 

94 43 


CALL 

DĚLY 



MS4 0 

EQU 

0DO4H 

4347 El 



POP 

H 



MSI 50 

EQU 

9000H 

4?46 Dl 



Fcr 

D 






4349 C9 



SET 







434A 79 


TI4: 

MOV 

A,C 






434B E6 

80 


ANI 

8 OH 




ORO 

430 OH 

434D CA 

55 43 


JZ 

TI3 

4300 OE 

06 

INSTL: 

MVI 

C,6H 

4350 3E 

4E 


MVI 

A.4EH 

4302 ti 

OB 43 


LXI 

D, TISKR 

4352 C3 

31 43 


JMP 

TI0 

4305 CD 

1£ 01 


CALL 

IODEF 

4355 79 


TI3: 

MOV 

A,C 

4308 C3 

07 44 


JMP 

4407H 

4356 06 

16 


MVI 

B.16H 

430B D5 


TISKR: 

PUSH 

D 

4358 C3 

40 43 


JMP 

TI2 

430C E5 



PUSH 

H 

435B 06 S4 

TI5i 

MVI 

B, 0E4H 

430D 26 

24 


MVI 

H, PORTO 

435D C3 

3D 43 


JMP 

Til 

43 OP 79 



MOV 

A,C 

4360 D5 


CTRL4: 

PUSH 

D 

4310 FE 

OD 


CPI 

0DH 

4361 11 

04 OD 


LXI 

D,MS40 

4312 CA 

5B 43 


JZ 

TI5 

4364 C3 

6B 43 


JMP 

TI8 

4315 PE 

20 


CPI 

2 OH 

4367 D5 


CTRL3: 

PUSH 

D 






4368 11 

C2 08 


LXI 

D.MS30 






436B E5 


TI8i 

PUSH 

H 

4317 CA 

71 43 


JZ 

TI7 

436C 26 

24 


MVI 

H, PORTO 

431A 11 

8A 43 


LXI 

D.T-21H 

436E C3 

40 43 


JMP 

TI2 

431D CD 

8B 43 


CALL 

CODE 

4371 3E 

to 

TI7: 

MVI 

A, 1 0H 

4320 11 

C2 08 


LXI 

D.MS30 

4373 06 

16 


MVI 

B,16H 

4323 7E 



MOV 

A,M 

4375 C3 

3D 43 


JMP 

Tli 

4324 S6 .10 


ANI 

1 OH 

4378 26 

2C 

VYSL: 

MVI 

H f PORT2 

432b CA 

4A 43 


JZ 

TI4 

437A E6 

7F 


ANI 

7FH 

4329 79 



MOV 

A, C 

437C 77 



MOV 

M,A 

432A E6 

80 


ANI 

8 OH 

437D 00 



NOP 


432C C2 

55 43 


JNZ 

TI 3 

437E 00 



NOP 


43 2F 3E 

3E 


MVI 

A.3EH 

437F F6 

80 


ORI 

6 OH 

4331 CD 78 43 

TI0: 

CALL 

VYSL 

4381 77 



MOV 

M, A 




“•‘á-i- 




4382 CD 

94 

43 


CALL 

DĚLY 

4385 E6 

7F 



ANI 

7FH 

4387 77 




MOV 

M,A 

4388 26 

24 



MVI 

H, PORTO 

438A C9 




RET 


438B 83 



CODE: 

ADD 

E 

438C 5F 




MOV 

E,A 

438D 3E 

00 



MVI 

A, 0 

438F 8A 




ADC 

D 

4390 57 




MOV 

D,A 

4391 1 A 




LDAX 

D 

4392 4F 




MOV 

C, A 

4393 C9 




RET 


4394 F5 



DĚLY; 

PUSH 

PSW 

4395 1 B 



DL: 

DCX 

D 

4396 7B 




MOV 

A,E 

4397 B2 




ORA 

D 

4398 C2 

95 

43 


JNZ 

DL 

439B F1 




POP 

PSW 

439C C9 




RET 

439D F5 



ZNAK: 

PUSH 

PSW 

439E 7E 



ZN: 

MOV 

A,M 

439F E6 

2E 



ANI 

2EH 

4 3 AI FE 

04 



CPI 

04H 

43A3 C2 

9E 

43 


JNZ 

ZN 

43A6 F1 




POP 

PSW 

43A7 CD 

78 

43 


CALL 

VYSL 

43AA C9 




RET 

43AB 11 



T: 

DB 

11H 


END ERROR(S)00 
MEMORY ASSEMBLER MCS-80 PAS 


mikroelektronika '88 












TESLA Strašnice k. p. 

závod J. Hakena 
U nákl. nádraží 6 
Praha 3-Žižkov 
130 65 

přijme: 

sam. odb. ekonoma-rozboráře 

(VŠ nebo ÚSO + praxe) 

sam. vývoj, pracovníky 

(VŠ nebo ÚSO + praxe) 

\ 

konstruktéry (ÚSO + praxe) 

sam. konstruktéry (VŠ + praxe) 

sam. odb. ekonomy (zásobovače) 

(ÚSO + praxe) 

ved. odb. techn. pracovníka (vedoucí pro- 
vozu a údržby) (VŠ + praxe) 

Zájemci hlaste se na osobním oddělení našeho závodu nebo na 

tel. 77 63 40. 


Nábor je povolena na celém území CSSR s výjimkou vymezeného území. 

Ubytování pro svobodné zajistíme v pod. ubytovně. Platové zařazení dle ZEUMS II. 


MIKROELEKTRONIKA 

faktor 
úspor 

a zvyšování účinnosti 
lidské práce 


TB8LA ELTOS oborový jmdnik zajtffuje technické « obchodní služby v oblasti spotřební a investiční elektroniky rtech 
VMJ T«^l« a také ve vybr aný ch oblastech produkce ostatních odvětvi elektrotechnického průmyslu. Plni též úkoly 
otektronoace národnAo hospodářství a mezinárodni technicko-obchodni kooperace. Z dalii rozsáhlé činnosti Z4$ifu£e 


+ Mikroelektronika - vývoj, aplikace, programování. Skolení a zavádění při elektronizaci národního hospodářství. 
+ Dodávky elektronických součástek. 

* Dodávky a servis investičních zařízení, vySSf dodavatelské funkce. 

+ Racionalizace a automatizace. 

+ Mezinárodní technicko-obchodni kooperace. 

^Průzkumový prodej novinek spotřební elektroniky a elektrotechniky. 

+ Prodej a servis spotřební elektroniky s poradenstvím, celostátní zásilková služba. 

+ Pomoc radioamatérům a mladým elektronikám, spolupráce se Svazarmem, SSM aj. 

+ Multiservis. 

+ Průmystovó opravárenství a Opravárenství. 

+ Ústřední gesce technického servisu, řízení a kontroly jakosti, zásobování součástkami a náhradními dtiy. 


ZÁVODY S OBLASTNÍ PŮSOBNOSTI: v Praze, Ústi nad 
Bystrici a Košicích. 


La be m, Ostravák Brně, Uherském 


Bralislatfě. Bantké 


ÚbeMrtn O r. ^^H^wiifcroctektr onick^apli ^cl. Pr^. (IM A); ^.od. Prah. (DIZ); z*ro<l 

SSSzES 


GENERÁLNÍ ŘEDITELSTVÍ 
113 40 Praha 1, Dlouhá 35. 

Tel. 231 5396, 
dlps 122629 

TESLA E LTOS 

oborový podnik 


ČKD Praha, o. p. 
závod POLOVODIČE 

na trase metra C 

stanice: Mládežnická — Budějovická 

Chcete pracovat v novém, atraktivním 
prostředí? 

Chcete pracovat na nejmodernější výpo- 
četní technice? 

Chcete vidět jak se chová vaše technické 
dílo? 

Chcete se podílet na programu automati- 

Čekáme na vás — informujte se přímo 
v závodě! 

Možnost získání bytu! 

PŘIJÍMÁME: programátory, systémové ing., prog. -analytiky, projektanty, teoret 
kybernetiky a ing. silnoproudé i slabo proudé elektrotechniky pro vývoj složitých 
automatických systémů řízení dodávaných do tuzemska i na export 

Přijímáme absolventy všech příbuzných oborů schopné a ochotné se podílet na 
tomto programu, ať již v oblasti vývoje HW a SW automat prostředků vyrábéných 
a vyvíjených v ČKD POLOVODIČE, tak v oblasti projektování a návrhů systémů 
automatizovaného řízení technologických procesů a těch. objektů pro oblast 
teplých a studených válcoven, hutního a slévárenského průmyslu, cementáren, 
úpraven rud a dalších. 

& 

Informace: nábor pracovníků — 
přímá linka 42 69 65 

ČKD POLOVODIČE, Budějovická 5, Praha 4 

v . 


